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EDITORIAL 


Tout d’abord, excusez nous pour les possibles erreurs de mise en page de ce JPC. Alors qu’il aurait 
dû sortir trois semaines seulement après le précédent (ce qui aurait pu réduire notre retard de 
parution) nous avons dû retarder de plus d’une semaine la parution à une date qui ne nous était pas 
favorable, suite à une avalanche d'incidents, et un d’accident. Le principal incident étant un délai 
important (plus de 5 jours !) dans l’acheminement d’une disquette par le poste. Quant à l'accident, il 
s’agit du "crash" d’une 205 bien connue des derniers partants de nos réunions mensuelles... Pourtant, 
malgré ces contretemps de dernière minute, nous avons réussi a tenir notre engagement d’éditer tous 
les JPC prévus cette année, ce que peu de clubs ont pu faire pendant cette période. Cependant, si le 
bureau a ainsi prouvé qu'il était solide, la taille et les délais de parution de JPC restent notre grand 
problème. Car nous ne pouvons pas faire plus pour le résoudre. Il est inutile de répéter encore une 
fois que l'incident précèdement mentionné n’aurait eu aucune incidence sur notre emploi du temps si 
nous avions un stock suffisant d’articles pour remplacer le contenu de cette disquette. Cela ne fait 
que confirmer une décision que nous avions prise auparavant, et dont nous avions discuté à de 
nombreuses reprises avec les adhérents, consistant à modifier certaines rêgles de fonctionnement de 
l'association. Lisez donc la page suivante pour tous les détails et soyez conscients que nous sommes 
les premiers à penser que ces changements n’auraient jamais dû avoir lieu. 


Maintenant, parlons un peu de ce journal. Comme promis le mois dernier, vous trouverez dans ce 
JPC notre opinion sur deux des derniers livres édités par les éditions Dunod. Selon des rumeurs 
persistantes, cet éditeur aurait d’autres livres consacrés à nos machines préférées dans ses cartons. 
Alors patience... 


Les utilisateurs de HP28 pourront constater que leur rubrique est très réduite ce mois-ci. Toujours 
les problèmes d’arrivage au "coup par coup". Les utilisateurs de palmtops pourront aussi constater 
que leur rubrique est relativement courte dans ce numéro. Cela est probablement dû au fait que le 
gros programme en assembleur qui y parait habituellement est ici réduit a quelques dizaines de 
lignes. Cependant, si au cours des précédents numéros nous avions souvent parlé du HP100, ce 
numéro contient pour la première fois des articles qui lui sont vraiment dédiés. Et ce n’est qu’un 
début ! 





Avant de terminer cet éditorial, nous vous souhaitons de joyeuses fêtes et une bonne année 1994. 
Nous vous donnons aussi rendez vous dans le JPC de février, qui devrait avoir (enfin !) une couleur 
plus "civilisée" que ceux de cette année... 
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DES NOUVEAUX STATUTS 
POUR PPC PARIS ? 


Depuis quelques années, le journal (qui faisait 
auparavant plus de 50 pages) n’a cessé de voir sa taille 
décroître et ses délais de parution compromis. 
Comme nous lavons dit à de maintes reprises, la 
seule et unique cause en est que les adhérents actuels 
ne nous transmettent pas d’articles. En fait, au cours 
de ces deux dernières années, seuls 23 adhérents ont 
fait paraître au moins un article. Certains auteurs 
réguliers, n’utilisant plus de HP, sont partis, ce qui ne 
fait qu’aggraver la chose. Aux débuts du club, plus de 
la moitié des adhérents envoyaient régulièrement des 
articles. Aujourd’hui, le journal ne parait plus que par 
la prédominance involontaire de deux auteurs. 








Cette situation m'est pas spécifique à PPC Paris, 
puisque tous les clubs sont touchés par la raréfaction 
des contributions. La grande majorité d’entre aux ont 
des retards de parution compris entre un et deux 
mois. D’autres, ayant "baissé les bras", ne font plus 
paraître leur journal qu’épisodiquement. Pourtant, la 
plupart d’entre eux ont un nombre d’adhérents égal 
ou supérieur à ce qu’il était il y a quelques années, 
quand ils n'avaient aucun problème pour alimenter 
leur publication. Paradoxal quand on sait aussi qu’il 
n'y a jamais eu autant d'activité sur les machines HP... 


Cela est peut-être dû au fait qu'on a un peu oublié 
que le principe de base d’une association est la mise 
en commun du travail et des connaissances de chacun. 
Or, cetains ne considèrent le club que comme le 
fournisseur de programmes ou d’un journal (au 
même titre que l’Ordinateur Individuel). 


De plus, il semble que certains auteurs réguliers sont 
de moins en moins motivés pour participer 
activement quand ils voient peu d'articles d’autres 
auteurs en échange de leur propre contribution. Pour 
être franc, certains de ceux ci sont souvent irrités par 
le fait que certains ne font rien pour participer, alors 
qu’ils ont souvent des choses à transmettre. 


Pourtant, une grande partie des adhérents se 
déclarents prêts à nous envoyer des articles, mais ne 
sautent jamais le premier pas ou reportent l'écriture 
d'un article à "La Semaine Prochaine”. Il faut donc 
leur donner un petit "coup de pouce". 


Pour toutes ces raisons, nous avons décidé de 
proposer, lors de la prochaine assemblée générale 
une mesure imposant a tous les adhérents d'envoyer 
au moins un article par an. Cette mesure aurait donc 
pour effet de rendre au moins symbolique la 
participation de certains, et donner le petit "coup de 
pouce" nécessaire aux autres. 


Suite à de nombreuses discussions avec les habitués 
de nos réunions, il semble que cette mesure soit 
favorablement envisagée. Cependant, nous pensons 
qu’il est indispensable qu’elle soit soumise au vote de 
tous les adhérents, afin qu’elle ne puisse plus être 
discutée par certains. Pratiquement, et afin de rendre 
cette mesure officielle, nous avons décidé de modifier 
les statuts de notre association, ce qui donnera à tous 
une règle commune. 


La modification toucherait l’article 7, dont le texte 
actuel est le suivant : 


Pour devenir membre de l'association, il faut avoir 
acquité sa cotisation et être agréé par le bureau. 


Nous ajouterions le texte suivant (le libellé exact 
pourra être discuté pendant l'AG) : 


Pour pouvoir réadhérer à l'association, il faudra en plus 
avoir transmis au club au moins un article pour le 
journal JPC, au cours de l'année d'adhésion 
précédente. 


Comme vous pouvez le constater, nous n’offrons 
toujours aucune obligation au nouvel adhérent. Ce 
n’est qu’au bout d’une année, et si il veut continuer de 
faire partie du club, qu’il est soumis à cette mesure. 


De facon plus procédurière, puisque nos statuts 
limposent, il est nécessaire de convoquer une 
Assemblée Générale Extraordinaire afin de délibérer 
d’une modification des statuts. Elle aura donc lieu le 
22 Janvier 1994, en même temps que notre assemblée 
générale annuelle. 


Comme je l'ai dit plus haut, nous n'avons encore 
rencontré aucune personne opposée à cette 
proposition. En fait cela nous pose même un 
problème, puisque nous ne pouvons pas donner le 
nom d’une personne sur laquelle les absents de 
Assemblée Générale pourraient reporter leur 
pouvoir. A cet effet, Eric Gengoux a accepté de jouer 
le role de l'avocat du diable" et de les représenter. 


Cependant, notez que si cette mesure est approuvée, 
nous pourrions ne la mettre en vigueur qu'après un 
certain délai (deux ou trois mois) afin de ne pas 
brusquer les personnes dont l'adhésion se termine 
prochainement. 


Pour terminer, je vous rapelle encore une fois que 
nous serons toujours à votre écoute (comme nous le 
sommes toujours d’ailleurs !) afin de vous aider à 
trouver des sujets d’articles possibles, ainsi que vous 
conseiller pour les préparer ! 


Jacques Belin (123) 
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LES BONS COMPTES 
FONT LES BONS AMIS 


Je rappelle que depuis avril 93 les utilisateurs de 
HP28S ont à leur disposition la fonction BYTES 
(PC 85 pages 9-10) comme sur les HP48. Vous avez 
remarqué que la rubrique le coin des codes fait 
toujours mention du Checksum et du nombre d’octets 
fournis par BYTES pour tous les programmes HP48 
et HP28. C’est la seule façon fiable et rapide de 
s'assurer que les objets dans les machines sont bien 
conformes aux listings correspondants. Cette fonction 
permet aussi d’identifier les différentes versions de 
programmes très rapidement sans avoir à les éditer ni 
les lister, ce qui peut-être très long (ou même 
impossible pour lassembleur) sans vous éviter les 
erreurs de comparaison. 


Je fais ce rappel car les personnes contribuant à la 
rubrique HP28 n'ont pas toujours les mêmes 
possibilités que leurs homologues HP48 pour nous 
transmettre leurs travaux sur support magnétique. 
C’est ce qui est arrivé à notre ami Paul Jebeily qui 
nous a livré un ensemble de programmes très 
intéressants sur le graphisme mais sur support papier. 
Ce mode de transmission méritoire n’est pas sans 
quelques risques de fautes de frappes qui ne peuvent 
être reprochées ni à l’auteur, ni à la personne qui met 
en page (en l'occurence notre dévoué Jacques). Ainsi 
malgré l’erratum du dernier JPC je n’ai pas réussi à 
faire tourner les démos. Si la fonction BYTES avait été 
utilisée et que le Checksum des programmes que j'ai 
tappés était le même je pourrais être certain que je 
n'ai pas fait de fautes de frappes ou dans le cas 
contraire je pourrais identifier le ou les programmes 
en défaut ce qui limiterait le travail de vérification. 


Ce programme BYTES avec son nom n’occupe que 199 
octets et les vérifications qu’il vous permet ne sont 
pas superflues car beaucoup n’ont pas la possibilité de 
sauvegarder leurs objets HP28 et sont à la merci de 
leur perte par utilisation de programmes en 
assembleur mal introduits. 8YTES est aussi utile aux 
programmeurs qui veulent optimiser leurs travaux. 


Merci à tous pour ce petit travail supplémentaire lors 
de l'envoi de leurs programmes. 


Guy Toublanc (276) 


TRUCS ASTUCES ET 
PETITS UTILITAIRES 


Il ne doit pas y avoir de ségrégation entre HP28 et 
HP48. Les idées ou programmes peuvent être adaptés 
d’une machine à l’autre. Ici on pourrait trouver des 
découvertes d'utilisateurs de HP28 mais pouvant 
avoir leur place côté HP48 ou au contraire des 
élements spécifiques HP28 parce que cela existe déjà 
dans la Rom HP48. 


J'ouvre cette rubrique avec un petit utilitaire 
comblant une lacune des HP28 par rapport aux HP48: 
passer sans effort en modes symbolique/numérique. 
Cette bascule entre les 2 modes affiche Yes si l'on 
passe en mode symbolique, sinon No. 


L'idéal serait un label sYmB avec carré en mode 
symbolique actif comme les labels du menu MODE. 


Exemple : passage en mode numérique par appui sur 
tsyM8]. Réponse NO (affichage d’une seconde au 
sommet gauche) : c’est bon, sinon deuxième appui. 


En User Rpl le programme serait : 


« 35 FC?C IF THEN 35 SF "YES" ELSE "NO" END 
1 DISP 1 WAIT » 


Donc en 81 octets se réduisant à 40 en System Rpl: 


SYMB 
Cksum: #37E6h 40 octets 


ASSEMBLE 
con(5) #02c67 * DOCOL 
con(5) #07307 * THIRTYFIVE 
con(5) #0204a * DUP 
con(5) #0c&dc * TestUserFlag 
con(5) #3dca3 * ITE 


con(5) #0c8c8  * ClrUserFlag 
con(5) #0c8a7  * SetUserFlag 
con(5) #07307  * THIRTYFYVE 
con(5) #0c8dc * TestUserFlag 
con(5) #3dca3 #-ÎTÉ 

con(5) #3ef53 A. AVES* 

con(5) #3ef63  * "NO" 

con(5) #1bba3 * DISPROW1 


con(5) #112c9 * %1 
con(5) #ialée * nait_real 
con(5) #02#90 + SEMI 


* 


Voir la liste des codes dans le Coin des codes. 


Guy Toublanc (276) 
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LITTERATURE HP48 


HP 48GoGX0S0o8SX en prépa 


Il y a un an j'avais analysé la première édition de cet 
ouvrage. A l’époque j'y avais trouvé des choses 
intéressantes mais je ne cachais pas que des 
améliorations étaient souhaitables. Depuis, un 
deuxième tirage a vu le jour (la HP48 a du succès en 
France). 


Aujourd’hui cette édition se veut bi-valente en faisant 
profiter à la fois les possesseurs de HP48 séries S et 
G des améliorations de cette deuxième mouture. 


L'ouvrage a gardé la même structure générale mais 
avec des améliorations et des compléments très 
substantiels faisant passer son volume de 398 pages à 
508. Je ne reviendrai pas sur sa structure car cela 
avait été développé assez largement dans le JPC n°82 
(pages 16-21) auquel je renvoie le lecteur pour 
l'analyse du contenu. 


Parmi les améliorations il y a celles que j'avais 
suggérées : 


- Indication du checksum et du nombre d’octets pour 
chaque programme ou objet pour permettre d’être 
assuré que l’on a bien reproduit les listings à la fois en 
User Rpl, System Rpl et assembleur. Cela permet 
également de déceler les programmes non identiques 
d’une édition à l’autre. 


- Indication du temps d'exécution pour obtenir les 
résultats des exemples. 


- Abandon de la méthode des frappes de touches qui 
était pour moi le point noir de ouvrage. 


- Fourniture des listings des fichiers sources avec des 
commentaires. Cela a été fait pour certains 
programmes et même consciencieusement. On 
conçoit que cela ne pouvait être fait pour l'intégralité 
des programmes et librairies sans poser quelques 
problèmes économiques. Evidemment que cela aurait 
comblé les curieux comme moi, mais pour un livre qui 
n’est pas spécialisé dans ce domaine nous ne pouvons 
pas en demander trop. 


- Partitionnement de la liste des internals par familles. 
Cela n’est pas aussi détaillé que dans les ouvrages de 
Jean-Michel Ferrard mais ce qui a été fait va dans le 
sens du progrès. encore ce domaine n’est pas 
l'unique objet du livre. 





- Amélioration de la rapidité des programmes en 
faisant appel à des programmes en System Rpl. Ceci 
a été réalisé pour des sous-programmes souvent 
appelés. Pour moi il aurait fallu aller plus loin dans ce 
domaine et peut-être même aborder les routines en 
virgule flottante via l’assembleur. 





- Utilisation d’un sous-programme d’aide en ligne et 
de vérification des arguments pour de nombreux 
programmes qui doivent faire ces vérifications. 


Jai pu constater qu'une grande partie de mes 
doléances concernant la première édition n’était pas 
restée lettre morte et que cela a permis de 
substantielles améliorations. Suis-je totalement 
comblé ? Non, il reste encore quelques points que 
j'aurais aimé voir améliorés. Par exemple la 
disparition totale dans les programmes des suites de 
IF THEN ELSE IF THEN ELSE . lorsque cela peut 
être très avantageusement remplacé par la structure 
CASE qui est plus simple et améliore la rapidité. 
J'avais donné un exemple (JPC 82 p 19) et le scénario 
pourrait se répéter pour d’autres programmes, par 
exemple pour le premier programme Look du livre où 
chaque condition exclut les autres et pourtant tous les 
tests sont effectués ligne par ligne : 





IF THEN . 


THEN . 


END 








Ce programme dont l'algorithme utilisé est un peu 
trop simple pour sa fonction de recherche de mots et 
mène parfois à des résultats inattendus. Un 
allègement de 121 octets sur 650 peut se réaliser sans 
nécessiter d’acrobaties. Il est resté une faute 
d’étourderie: la séquence SWAP 3 ROLLD SuAP est 
équivalente à ROT. D’autres ont échappé ici et là à la 
sagacité de lauteur comme par exemple dans le 
programme FIND avec DROP DROP au lieu de DROP2. 


Un autre motif d’alourdissement de programmation 
que l’on rencontre dans le livre et que j'avais déjà 
dénoncé est la répétition des tests : 


au lieu de 1F NOT THEN 
au lieu de 1F THEN 


IF O == THEN 
IF O # THEN 


Ces types de programmation sont très persistants 
chez d’autres auteurs alors que certains ont su s’en 
dispenser rapidement. 


Concernant les listings, si j'ai reproché à un autre 
auteur labus d’artifices typographiques pour gonfler 
le volume d’un ouvrage, à l'inverse certains pourraient 














reprocher à ce livre la très grande compacité des 
listings, sans indentation et donc rendant plus difficile 
la lisibilité des programmes et leur compréhension. Je 
pense qu’une solution raisonnable est celle qui 
consiste, dans un ouvrage, à distinguer deux choses : 


- D'un côté les leçons où les listings respectent bien la 
structure des programmes et ceux-ci étant commentés 
ligne par ligne. 


- De l’autre côté les outils pouvant être mêmes de 
gros programmes et que l’auteur livre comme des 
utilitaires sans but pédagogique mais dont le nombre 
sera un critère d’achat du livre pour un utilisateur 
courant. Ici on se contente de savoir ce qu’il faut 
fournir à un programme et ce qu’il nous donnera en 
retour. 


Si l'aspect économique n’entrait pas en compte, 
l'idéal serait évidemment d’avoir sur toutes les pages 
des listings type /eçon. Mais quant à avoir, dans un 
livre que je ne reciterai pas, des lignes du genre : 
programme toto 

« 

DuP 

programme … 


au lieu de: 


programme toto 
« DUP » 


programme . 





ce qui me semble aussi compréhensible, je dis non. 


Du point de vue des programmes outils, je pose la 
question quel est le pourcentage parmi les 
utilisateurs de bibliothèques de programmes en 
simple User Rpl qui font l'effort d’analyser les listings 
pour les comprendre ? 


Le reproche des listings compacts de ce livre peut 
être tempéré par le fait qu’une disquette de tous les 
outils est jointe à l'ouvrage ce qui permet d'éviter les 
fautes de saisie pour entrer les programmes. Libre à 
chacun de lister ces outils à partir de la HP-48 avec 
les indentations données par celle-ci lors de 
l'impression ou même de la transmission en mode 
ascii à un PC, puis de les analyser plus 
confortablement. 


Maintenant chaque chapître de programmes débute 
par une liste de ceux-ci avec ce qu’ils font. Une bonne 


chose pour avoir une vue d'ensemble et s’y retrouver 
parmi tous ces programmes. 


Dans cette catégorie de chapîtres, deux ont vu le 
jour : 


Physique (8 pages) 


Avec BODE programme principal de tracé et d’étude de 
fonctions de transfert. 


et 6188s pour le calcul de l’enthalpie 


Chimie (12 pages) 


Pour le calcul du pH avec des sous-programmes de 
saisie des données. 


Et le calcul de la masse moléculaire en se servant 
d’une liste des masses moléculaires atomiques à 
compléter suivant les besoins de chacun. 


Le chapitre Arithmétique voit maintenant les deux 
programmes Eb1vI et PGCD bien listés avec des fichiers 
sources très bien commentés. Pour EDIvI la liste des 
codes est à modifier : à la ligne 2 on doit avoir CCD 203 
et non Cco 201 sinon cela ne fonctionne pas. Il y a eu 
aussi une erreur avec ce programme sur la disquette. 
L’assemblage a été mal réalisé. 


Pour les autres programmes de ce chapître deux 
versions sont données : une en User Rpl et une en 
System Rpl plus rapide. Cela va dans le sens de que je 
souhaitais: l'amélioration de la rapidité d’exécution, 
en particulier pour des programmes souvent appelés. 





Le chapître Assembleur se termine maintenant par 
une initiation accessible à la programmation dans ce 
langage en partant d'exemples de programmes bien 
commentés. Cette partie sera bien accueillie par les 
débutants en assembleur. Evidemment qu’il n’est pas 
possible de tout dire en 20 pages, mais ce qui a été 
tenté est méritoire. 


Le chapitre /nternals possède maintenant sa petite 
introduction à la programmation en System Rpl en 
partant d’un exemple en User Rpl et traduit dans 
l'autre langage. La liste des adresses fournies a été 
partitionnée par grandes familles avec une colonne 
HP48S/X et une conne HP48G/X. Ce chapître se 
termine par un paragraphe Remarques contenant un 
programme PIK pour accéder à la Rom cachée pour la 
partie #C0000h à #FFFFFh ct un programme pour 
l'adresse d’un objet en Ram. 
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Le chapître Applications est devenu Extensions et a 
grossi avec la fourniture de 4 programmes : 

-3 compacteurs pour HP48 présentant des avantages 
et des inconvénients suivant le type d’objet HP48 sur 
lequel ils opèrent. 

- 1 décompacteur pour les trois types de compactage. 
Il s’agit en réalité de 3 décompacteurs réunis en un 
programme. 


Tous ces programmes sont en assembleur et livrés 
sous forme de codes hexa à assembler. 


Le dernier chapitre donne le mode d'utilisation de la 
disquette DOS 3"1/2 720 Ko utilisable sur PC et sur 
Macintosh (avec lecteur HD 1.44 Mo). 


Contrairement aux récentes éditions de livres du 
domaine HP48 ct qui ont coupé les ponts avec les 
HP48S/X, HP48 en prépa se veut bi-valent par son 
titre. Qu’en est-il exactement ? Il y a 2 versions pour 
séries S et G des programmes : 

- SYs pour rappeler un objet en Rom 

- L18- pour décomposer une bibliothèque. 


A cela on peut ajouter dans le chapître /nternals les 
doubles listes d’adresses pour HP48 G et S. Des 
renseignements concernant les ports des deux types 
de machines font aussi les différences, et enfin le PEEK 
en Rom cachée pour les 128 derniers Ko de la Rom 
HP48G/X. 


Pour le reste tout est commun et cette très large 
compatibilité pourra peut-être appararître comme 
contraignante pour les nouveaux venus dans le clan 
HP48 mais série G ou ceux qui renient leur HP48 
série S. En effet ces derniers auraient peut-être 
préféré une mise à profit, pour les programmes en 
User Rpl, des nouvelles possibilités de leur HP48. Le 
choix fait pour ce livre bi-valent peut se justifier si on 
considère qu'il réapparait dans une période de 
transition pour les HP48 et ainsi peut rendre service à 
une large clientèle. 





Dans ma précédente analyse j'avais fait allusion à la 
plus où moins grande rapidité des programmes. Un 
certains nombre de ceux-ci travaillant avec les 
rationnels, ce qui est un plus, perdent en rapidité du 
fait que les manipulations d'objets sont plus 
compliquées. Il doit être possible d’améliorer cela, ce 
qui est un excellent exercice de reprogrammation 
pour qui veut s’y atteler. 





Conclusion : 


Cet ouvrage constitue une boite à outils qui s’est 
améliorée en de nombreux points. Comme tout ce qui 
a un caractère polyvalent, elle ne sastisfera pas le 
futur spécialiste d’un domaine particulier mais les 


chapitres satellites de la partie principale (les 
programmes mathématiques) inciteront à aller plus 
loin. Les possibilités de la HP-48 peuvent laisser 
envisager d’autres extensions de l’ouvrage qui n’ont 
pas été abordées ou très peu développées et nous ne 
pouvons que souhaiter une autre suite à ce livre et 
donner rendez-vous pour la troisième édition où 
quelques défauts auront été gommés. 


Guy Toublanc (276) 


HP 48 G GX S SX en prépa 
Matthieu Cornillault 
M. de Counville E. Lesueur 
DUNODTECH 
175 francs (disquette comprise) 





COURRIER DES LECTEURS 


Je rappelle que cette rubrique est toujours à la 
disposition de chacun pour poser des questions et que 
les éventuelles réponses peuvent intéresser d’autres 
lecteurs. Celles-ci pourront être plus ou moins 
rapides suivant leur niveau de difficulté ou même ne 
pas voir le jour si personne ne peut les fournir. Mais 
dans tous les cas il faut tenter sa chance. Cette 
rubrique est particulièrement utile aux lecteurs qui ne 
peuvent pas assister aux réunions. 


Guy Toublanc (276) 


Edmond-Jean Dougados 
BP 144.09 
75422 Paris Cedex 09 


NDLR: extrait d'une lettre qui nous a été adressée 


sas cherche une solution de remplacement de la 
plaque métallique du clavier (HP48SX) dont la 
peinture s’égratigne facilement, cette plaque ne 
pouvant être fournie par HP la solidité des HP48 
ne vaut pas celle des HP41 et 28 (utilisation sur 
chantier bâtiment ou génie-civil) …. 





Réponse du Dr JPC 


Malheureusement, si l'on peut déplorer cette plus 
grande vulnérabilité extérieure, il n’existe pas de 
solution curative peu coûteuse hors celle de récupérer 
une plaque en bon état sur une machine inutilisable 
par ailleurs. 














Les lecteurs qui possèderaient une telle machine 
seraient gentils de se manifester. * 


Les solutions préventives existent : 


- Recouvrement de cette plaque (pas les touches) par 
l'un des caches du kit : 


HP 82220A 
Overlay Kit for HP48 


ce kit comprend : 


1 cache transparent avec des caractères qui 
n'apparaissent pas sur la plaque du clavier 

3 caches transparents 

3 caches opaques blancs pour clavier 
personnalisé 


- protection par un sachet transparent étanche et 
épousant la forme de la machine, que l’on trouve chez 
EduCalc (j'ignore si cela est disponible en France) : 


#543X Standard Comp-U-Bag $2.50 
#543XT 10 Standard Comp-U-Bag 519.95 
#543U Anti-Static Comp-U-Bag $2.75 


#S43UT 10 Anti-Static Comp-U-Bag 521.95 


Il y a aussi la solution de réaliser soi-même ces 
sachets le problème est d’avoir un plastique qui 
n’altère pas la lisibilité du clavier et de l'écran, ce 
plastique doit bien épouser la forme de la machine et 
posséder une fermeture étanche et pratique pour 
accéder aux trappes ou permettre une éventuelle 
connection. La solution de raccordement des bords 
du plastique par soudure thermique peut donner de 
bons résultats. 


Joel Thibaut 
65, impasse Morand 
44000 Nantes 


Que font les points d’entrée (HP48S/X): 


62160h ? 
621F3h ? 


Réponse du Dr JPC 


Vous ne dites pas si vous avez trouvé ces adresses lors 
d’une décompilation de type Rpl ou assembleur. Les 
décompilateurs en mode automatique ne donnent pas 
à tout coup des listings exacts. En assembleur le code 
peut correspondre à des tables qui n’ont rien à voir 
avec des instructions. D’autre part pour protéger une 
librairie un programmeur peut très bien inclure du 


code qui ne sert à rien sinon qu’à empécher un 
désassemblage automatique. Dans ce cas il faut 
désassembler en pas à pas ce qui n’est pas à la portée 
du débutant. 


En ce qui concerne les deux adresses données, cela ne 
correspond à rien. Voici la méthode permettant 
d'affirmer cela : 


Chercher dans une liste de points d'entrées une 
adresse voisine en amont. Pour 621560h nous avons 
#62159h de mnémonique HP TYPECSTR? ou st? chez 
JM. Ferrard. C’est une primitive qui teste si un objet 
est une chaîne et dont le code décompilé donne : 


62159 6215E (primitive) 
6215E 34C2A20 Lchex =DOCSTR 
62165 65FE goto #6205B 
puis nous trouvons: 
62169 cc A=A-1 A 


# 62160h ne correspond donc à rien. Si vous faites un 
Syseval à cette adresse vous obtiendrez sur la pile une 
chaîne étrange dont Size donnera 423848 pour 
longueur !! Cela s’explique avec le code en mémoire à 
partir de # 62160h : 


c2A20 
prologue chaîne 


65FEC CES 

Longueur données 

#CEF56h - 5 = #CEF51h #CEF51h / 2 = #677A8h 
# 677A8h = # 423848d 


Pour 621F3h nous trouvons #621EC de mnémonique 
JM. Ferrard rpl? qui est aussi une primitive qui teste 
si un objet est un programme Rpl et dont une 
décompilation nous donne : 


621EC 621F1 primitive 
621F1 3409020 Lchex =DOCOL 
621F8 626€ goto  #62058 
puis nous trouvons: 
G21FC CC ASA-1 A 


Ceci permet d’affirmer que #621F3h ne correspond à 
rien non plus. Un Syseval avec cette adresse ne 
produira que l'exécution d’un programme incohérent 
qui ne s’arrêtera qu'avec un arrêt système. Cela 
s'explique encore avec le code en mémoire à partir de 
# 621F3h: 

D9D20 626EC C. 
prologue programme 
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Pour des programmeurs voici donc deux moyens 
parmi d’autres de brouiller les cartes et d'empêcher 
les regards indiscrets ou les indélicats (et il n’en 
manque pas) de s’approprier le travail des autres. 


Vous n'êtes pas le premier à poser des questions de 
ce type et qui aboutissent à des réponses de 
non-existence. Mais j'espère que les explications 
données ici vous satisferont plus que celles que l'on 
rencontre sur certains serveurs et qui sont du genre 
"C’est l'anniversaire de ma grand-mère". 


Guy Toublanc (276) 





NUMERO DE SEMAINE 
Acte Il 


Robert Pulluard nous proposait (JPC 91 page 11) un 
petit programme calculant le numéro de semaine 
dans l’année et correspondant à une date donnée. 
Robert nous fournissait l’algorithme et sa méthode en 
laissant deviner qu’il livrait en pâture son programme. 


Quelques essais ont permis d’apporter de sensibles 
améliorations: 


1- en User Rpl un gain de 57 octets sur 158,5. 
2- la traduction en System Rpl fait encore gagner 12.5 


octets. 
3- un peu d’assembleur permet encore d’alléger de 14 
octets. 


Rappel du listing du programme de Robert (ici les 
enconbrements mémoire sont obtenus avec l’objet sur 
la pile): 


NSEM 158.5 octets 


« DUP NOT € DROP DATE } IFT a1 
-2 ALOG MOD LASTARG ROT + 1 + a2 
DUP ROT DDAYS 3 + a3 
€ "MON" MTUEN MYEDI MTHUM MFRIM MSATU MSUNN } à 4 
ROT O TSTR a5 
1 3 suB POS a6 
4 - 7 MOD + a7 
7 J FLOOR » a 8 





1ère étape : progammation en User Rpl 


Je nai pas découvert la recette miracle pour me 
dispenser des chaînes de caractères. De ce point de 
vue Robert va être déçu. Les 57 octets disparus sont 
la conséquence de points de détails : 


- Ligne 1 : la neutralité de zéro pour l'addition permet 
de gagner 5 octets. 

- Ligne 2 : pas de gain mais affranchissement de 
LASTARG. 

- Ligne 3 : en conbinant l'algorithme des lignes 3 et 7 
on gagne ici 5 octets. 

- Ligne 4 : pour identifier le jour de la semaine les 2 
premiers caractères suffisent. Une seule chaîne 
nécessaire en utilisant l’algorithme de la ligne 7 ce qui 
économise 42 octets. 

- Ligne 7 : la conbinaison de l'algorithme des lignes 3 
et 7 permet de gagner ici 5 octets. 


Ce programme est légèrement plus rapide mais ce 
n’est pas le point fort. 


NSEMuser 
Cksum: # A98Bh 101.5 octets 


« DUP O DATE IFTE + a1 
-2 ALOG OVER OVER MOD + 1 + a 2 
DUP ROT DDAYS a 3 
MMOTUHETHFRSASU" a4 
ROT O TSTR a5 
1 2 SUB POS aé6 
2/+ a7 
7 / FLOOR » a 8 


2ième étape : progammation en System Rpl 


A partir de maintenant les gains d’octets ne sont plus 
à mettre au compte d’améliorations de détails par 
rapport au programme de Robert, mais seulement à 
l'actif d’un autre langage. En effet je suis pas à pas 
mon programme en User Rpl dont je conserve 
quelques instructions de ce langage. Donc ici 12,5 
octets de moins seulement. %-2 %ALOG est remplacé 
par %100 %1/ ce qui donne le même résultat mais c’est 
histoire de varier. Je rappelle que lorsque des 
instructions User Rpl sont utilisées, elles sont 
préfixées par x pour les distinguer de celles en System 
Rpl. 


NSEMsys 89 octets 


ASSEMBLE 

=xDUP EQU #1fb87 
=xPOS EQU #1cabé 
=XTSTR EQU #19992 
RPL 
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xDUP %0= ITE DATE DUP 

SWAPDROPDUP %100 %1/ SWAPOVER MOD %+ %1+ 
DUPROT DDAYS 

MMOTUVETHFRSASU" 

ROT %0 xTSTR 

THREE 1_#1-SUB$ xPOS 

22 %1 %+ 

%7 %1 %FLOOR 


3ième étape : progammation en System Rpl et 
assembleur 


Ici nous pouvons nous dispenser de la chaîne des 
débuts de noms de jours grâce à l’assembleur. La 
première instruction en User Rpl a été conservée car 
elle permet un gain d’octets par rapport au System 
Rpl. C’est donc le programme le plus court et aussi le 
plus rapide (3 fois plus que celui de Robert). 


NSEMass 75 octets 
ASSEMBLE 

=xDUP EQU #1fb87 

RPL 


XDUP %0= ITE DATE DUP 
SWAPDROPDUP %100 %1/ SWAPOVER ZMOD %+ %1+ 
DUPROT DDAYS 
COERCESUAP 
CODE 

gosbvl =POPDATEX 

gosbvl =YMD>Ticks 

gosbvl =doutil 

sethex 

govlng =PUSH#ALOOP 
ENDCODE 
#+-1 SEVEN #/ SUAPDROP UNCOERCE 


4ième étape : pour les puristes 


Tous les programmes ci-dessus (y compris celui de 
Robert) renvoient des messages d’erreurs qui ne 
satisferont pas les puristes. Aussi voici l'ultime version 
un peu plus octivore mais renvoyant des des messages 
beaucoup plus orthodoxes. Il ne reste donc plus une 
seule instruction User Rpl. 


NSEM2 
Cksum: # 4D43h 85 octets 


CK1NoBlame CK&DISPATCHI real 





DUPY0= ITE ......... 
Ékcdhs UNCOERCE 





Je rappelle que ces listings en assembleur et System 
Rpl sont compilables avec les compilateurs HP sur 
PC. Pour ceux qui utilisent la librairie <-RPL-> sur 
HP48 il suffit de mettre en majuscules les 
mnémoniques de la partie CODE et pour les chaînes 
de faire $ "ecce..." où cecc.….. sont les caractères. 

A titre expérimental voici les listings sources, du 
programme NSEM2, compilables sur PC avec les 
mnémoniques et les compilateurs de Jean-Michel 
Ferrard. Le fichier source DoW.ash doit d’abord être 
compilé avec aAsmPc pour générer le fichier objet 
ASM.oBJ. Puis le fichier source NSEM.SrC devra être 
compilé avec EXTERNPC pour obtenir le programme 
HP48 sem. 





NSEM.SRC 
begin 
depth=0?:TFA! ChkArg <1h> 


begin 
dup;=0(r)? pifte date dup 
drop(2);dup X1E2 invr) suap;over mod(2r) 
+C2r) 1407) 
dup;rot ddays(2r) 
r=>s;suap 





INCLUDE DOW.OBJ 


+(2s);1-(S) <7h> mdv(2s) drop(2) s=>r 
end 
end 


DOW.ASM 


gosbvl #0D92C 
gosbvl #0D83A 
gosbvl #0DB51 
sethex 

goving #0357C * PushA<>« 
Cet article n’a pas la prétention d’avoir fermé la 
parenthèse sur ce problème, aussi le champ est libre 
pour des solutions plus astucieuses quel que soit le 
langage de programmation. Merci à Robert de nous 
avoir tendu la perche et dont l’article me dispense de 
fournir d’autres explications sur le fond du problème. 


Vous trouverez la liste des codes de NSEM2 dans le 
Coin des codes. 


Guy Toublanc (276) 
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VOYAGE BIZARRE 


et code nul 





Ceux qui ont utilisé le coin des codes pour les 
programmes BANKN2 et 60 de Pierre de Sacy et dans le 
dernier JPC-91, ont dû trouver étrange : 

- la fin des codes avec tous ses Zéros 

- la non conformité du checksum ainsi que du nombre 
d’octets (plus) donnés dans le coin des codes et ce qui 
est obtenu après assemblage dans la HP48 . 

- que la liste des codes du programme xMOD-KER ne 
posait pas ces problèmes. 


L’explication est simple : Ces programmes de Pierre 
ont fait le voyage ou transfert HP48-PC sous 
protocole Xmodem et les outils que le club possède 
pour établir les listes de codes, sont des programmes 
sur PC et qui ont été réalisés pour des HP48S/X donc 
pour des programmes HP48 transférés sous protocole 
Kermit. 


Le résultat obtenu après assemblage de ces listes de 
codes trop longues n’a pas d'incidence grâce à NEWOB 
du programme d'assemblage qui remet tout ça en 
ordre. 


Si les programmes fournis par Pierre sur disquette 
devaient faire le voyage PC-HP4S, il y aurait deux 
possibilités (JPC 91 page 14) : 

- Utiliser le protocole Xmodem. 

- Ou utiliser le protocole Kermit et récupérer le 
programme, de la chaîne obtenue après transfert, 
avec le programme XMOD-KEr (JPC 91 page 14). 


Pour ceux qui devraient entrer les codes de ces 
programmes voici le début et la fin des listes à 
modifier par rapport à celles de JPC 91: 


BANKN2 
# ECE2h 


CHP48) 
353 octets 


0123 4567 89AB CDEF sm 


000: D9D2 OFDE 8111 9201 CAC 


02c: 30 7AS 
Go CHP48) 
# F4D1h 359.5 octets 


0123 4567 89AB CDEF sm 


000: D9D2 OECE 8182 040D E3D 


O2C: 4423 0821 3082 130 BAA 


Moralité : Lors de l’envoi au club de programmes sur 
disquette, utilisez le protocole Kermit qui est pour les 
petits objets (quelques centaines d’octets) aussi 
rapide que Xmodem car d’accès plus rapide ce qui 
compense la lenteur du transfert lui-même. Ainsi 
nous n’aurons plus de VOYAGES à problèmes avec 
un surplus de CODE NUL. 


Guy Toublanc (276) 


TRUCS ASTUCES ET 
PETITS UTILITAIRES 


On sait que l'éditeur des HP-48 a toujours été par sa 
lenteur la partie faible de cette machine. 


Ce qui suit intéressera surtout ceux qui éditent leurs 
programmes et chaînes avec l'éditeur de leur machine 
et gagneront un peu de temps sans effort avec une 
méthode qui, si elle n’est pas géniale, a l'avantage 
d’être simple (et même simplette). 


Le problème des larges césures 


1- Couper une chaîne par larges séquences lorsque 
celle-ci est éditée peut se faire normalement avec les 
commandes de l'éditeur “DEL ou DEL+ si des 
changements de lignes existent dans la chaîne ou 
caractère par caractère avec [-] (backspace) pour des 
parties de lignes ou lorsqu'il n'y a pas de changements 
de lignes. Ceci peut-être laborieux. Il existe une 
solution simple à laquelle certains ne pensent 
peut-être pas. Il suffit d'insérer des ” entre les suites 
de caractères à conserver et celles à éliminer lorsque 
l'éditeur est actif. La sortie de l'éditeur se réalisant 
avec [ENTER] vous trouverez 7 chaînes sur la pile au 
lieu d’une. Il ne restera plus qu'à éliminer les 
indésirables puis à concaténer ce qui reste (avec [+1) 
et dans le bon ordre pour restituer la chaîne allégée. 
Cette façon de faire n’est évidemment rentable que 
pour de larges coupures dans de longues chaînes, ce 
qui est le cas des fichiers sources assembleur compilés 
dans une HP-48. 














2- en ce qui concerne les coupures de programmes la 
méthode peut être appliquée de la même manière : 
transformer le programme en chaîne avec -STR puis 
opérer comme pour les chaînes et modifier la chaîne 
par les ajouts nécessaires à la nouvelle structure du 
programme (ceci peut aussi se faire en phase finale). 
Après concaténation des parties subsistantes et, si 
cela n’a déjà pas été réalisé, modifier la structure du 
programme avant de passer à la transformation en 
programme avec OBJ+. L'avantage de travailler sur la 
chaîne au lieu du programme lui-même est que 
l'éditeur est moins lent avec le type d’objet chaîne. 


Lorsque les chaînes ou programmes contiennent des 


chaînes cette méthode n’est plus applicable ce qui 
m’amène au problème suivant. 


Du bon usage de CS 

Ceci pourra intéresser plus particulièrement les 
possesseurs de HP48G/X car à ma connaissance CS 
nest documentée dans aucun des manuels des 
HP48G. C$ permet de générer des chaînes comptées 
(manuel d'utilisation des HP48SX page 88 ou tome 1 
de La maîtrise de la HP48SSX par J.M Ferrard, page 
144) ce qui peut permettre des acrobaties avec 
certains types de chaînes. Si vous tapez "TOTO "bise 
pour obtenir une seule chaîne, en validant avec 
[ENTER] vous obtiendrez: 

"TOTO " 


‘bis’ 


Ce qui n’est pas le résultat escompté. 


Pour obtenir la chaîne tapée ci-dessus il faut taper 
une chaîne comptée : 


c$ 10 TOTO "bis" 
avec le nombre de carctères précisé: 10 
ou C$ $ TOTO "bis" 
Rappel: $ s’obtient avec a] [shift gauche] [4]. 
Après validation nous trouverons sur la pile : 
MTOTO "bis" 
Si l'on édite ce résultat la machine fournira: 
c$ 10 TOTO "bis" 


Si, en restant dans l'éditeur, vous modifiez cette 
chaîne, deux cas se présentent : 


1- Réduction: alors modifiez sans compter. 
C$ 10 TOTO "as" 
la machine vous donnera: "TOTO "as", 


2- Expansion: alors modifiez la chaîne et l'en-tête 
pour laisser à la machine le soin de compter. 


C$ $ TOUTOU "as" 


Cette technique des chaînes comptées ne permet 
donc pas les coupures par la méthode exposée au 
début de larticle. Donc il faudra couper par la 
méthode normale les chaînes contenant elles-mêmes 
des chaînes ou le caractère ‘""". Le recours à ces 
chaînes comptées sera particulièrement utile à ceux 
qui font de l’assembleur directement dans leur HP48. 


A propos d’éditeur 


Pour les objets éditables avec l’éditeur HP il devient 
particulièrement inconfortable, lorsque le volume des 
objets grossit, de visionner puis de traiter ces objets. Il 
existe des solutions de remplacement parmi lesquelles 
il faut distinguer les visionneurs (viewers) et les 
éditeurs avec des fonctions de traitement de ces 
objets. 


Un certains nombre de programmeurs ont créé des 
programmes ou des librairies qui entrent dans une de 
ces catégories. 


Dans la catégorie "Editeur" je signalerai, parmi les 
outils importants, deux de ceux-ci : 


ae de Lutz Vieweg (aussi auteur du très célèbre 
compacteur RFU). La version que je connais est 
contenue dans le répertoire UTILS des Goodies Disk 
#6 (et avec une documentation complète). Ceci est 
diffusé en shareware. Cette version datant de deux 
ans, je suppose que l’auteur a dû l'améliorer. 


L’excellente et bien connue librairie STRING WRITER qui 
nécessite de la place disponible car si la version 1 
occupe 9 Ko, la version la plus récente atteint les 23 
Ko, donc les possesseurs de HP48S ou HP48G seront 
peut-être obligés de s’en dispenser. 


C’est une librairie qui est plus qu’un éditeur car ayant 
les fonctionnalités d’un traitement de texte très 
performant. Lorsqu’on la possède les ’trucs’ exposés 
ci-dessus sont inutiles. 


Elle fut créée à l’origine par deux programmeurs : 
Jean Yves Avenard et Christian Bourgeois. Le 
premier fait maintenant cavalier seul. Cette librairie a 
évolué dans le temps avec toujours plus de nouvelles 
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fonctionnalités ou raffinements en tenant compte des 
remarques d'usagers. Si les premières versions se 
trouvent en téléchargement sur certainss serveurs, ou 
sont diffusées par d’autres voies, à partir de la version 
4 cette librairie est en shareware ce que certains ont 
critiqué mais, pour ma part cette solution ne me 
choque pas. Quand on fait le compte de ce qui peut 
rester sur les 50 francs demandés, l’auteur ne va 
certainement pas se faire une fortune. En effet les 
souscripteurs ont droit à une actualisation avec sa 
documentation. 


Pour ceux qui doivent éditer chaînes et programmes 
(ce que font les dernières versions alors que les 
premières n’éditaient que des chaînes) c’est un outil 
essentiel et très performant par sa vitesse car très 
largement en assembleur. 


La version 42, dont j'ai vu une démonstration, est 
compatible HP48SX et HP48GX et peut être mise 
dans l’un quelconque des ports de la HP48GX. La 
dernière version a encore un bug connu (au moment 
où j'écris : problème lorsque les batteries sont faibles 
et que l’on éteint la machine) qui devrait disparaître 
avec la version suivante. En attendant celle-ci voici les 
coordonnées de l’auteur pour qui voudrait souscrire 
(50 francs) et recevoir la disquette avec la 
documentation complète plus des suppléments 
(fontes, utilitaires, jeux ainsi que les anciennes 
versions 4.1 de 17 Ko ): 


Jean-Yves Avenard 
16 rue de Savigny 
91390 Morsang sur Orge 


Je signale que je ne connais l’auteur que très 
indirectement mais il me semble qu'il est utile de 
révéler l'existence des outils performants qui, s'ils 
sont bien connus des HPistes parisiens le sont moins 
des provinciaux isolés pour qui le recours aux 
serveurs est très onéreux. 


A votre tour de nous donner des informations sur 
d’autres produits que vous connaissez. 


Guy Toublanc (276) 


TRADUISEZ LES MESSAGES ! 


Les messages d’erreur ou d’environnement (STAT, 
PLOT, TIME...) utilisés par la machine sont ceux des 
librairies de numéros 0, 1, 2, 3, 5, 6, A(10), B(11), 
C(12) et D(13). Hormis la librairie 2, ce ne sont que 
des fragments de librairie qui, il me semble, ne 





servent qu’à générer les messages. Rappellons au 
passage que les messages sont stockés dans toutes les 
librairies sous forme de tableaux de chaînes (array of 
string). 


Pour l’utilisation de la table des messages d’une de 
ces librairies, deux cas se présentent : 


- ou bien la librairie n’est pas attachée au répertoire 
courant : la machine se sert alors directement de 
ladresse en ROM (Les différentes adresses de ces 
tables sont #72000h, #72704h, #72DCFh, #72F1Eh, #736F9h, 
#72FE6h, #72281h, #726A5h, #7232Ch et #7260Ah). 


-ou bien la librairie est attachée au répertoire 
courant : la machine se sert alors de l'adresse de la 
table dans l’objet-répertoire courant (après le numéro 
de lib et l’adresse de la hash-table) 


Pour mettre les messages d’une de ces librairies en 
français, il suffit donc d’attacher cette librairie au 
répertoire courant (HOME de préférence) et de 
remplacer ladresse de sa table des messages par 
l'adresse d’un autre tableau de chaînes. 


Cela peut se faire par le programme : 


PROG 

<n de Lib> 
$ 07709 

<n de Lib> 
ARR1 

$ O746E 
END 


Ce programme attache la librairie 
dans HOME. 


Remarque : Il est très important que ARR‘ ait une 
adresse fixe. Il faut donc que ce tableau soit stocké 
dans une variable ou un nom XLIB. 


Ne faîtes pas comme moi qui, devant la taille des 
messages (environ 4Ko), avais essayé de les 
compacter. 


L'adresse #0746Eh prend en argument le numéro de 
librairie sous forme d’entier-système et un tableau de 
chaînes à adresse fixe (pas de NEwos). Elle remplace 
l'adresse de la table des messages de la librairie dans 
le répertoire HOME par celle de ARR1. 


Pour remettre les messages en anglais, il suffit de 
détacher la librairie : 


PROG 

<n de Lib» Ce programme détache la librairie 
$ O76AE de HOME. 

END 














Cas particulier : la librairie 2 


Elle contient des fonctions RPL-utilisateur. Dans le 
premier programme, il n’y a donc pas besoin de 
lattacher (elle s’est déjà attachée grâce à sa config), 
et dans le second il faut la réattacher après lavoir 
détachée. 


Pour convertir une liste de messages en un tableau de 
chaînes, le plus simple est encore d'utiliser 
LIBMAKER 3.2, de BouHP (sur la Goodies Disk 7). 


Remarque : cette méthode ne permet pas franciser 
les mots "Array of" qui, suivis du nom en français d’un 
type d'objet, apparaissent pour désigner un tableau 
d'objet de ce type. "array of string" apparaît sous la 
forme "Array of Chaîne". Je n’ai pas encore trouvé de 
remède à cela. 


Arthur Ripoll (590) 





UNE LIBRAIRIE TRES 
ATTACHANTE 


Cet article a pour but de présenter une librairie 
présentant la particularité d’être totalement en écrite 
en assembleur. 


Mais cette librairie aura une fonction particulière 
puisqu'elle sera articulée autour de son config 
(programme à exécuter lors d’un Arrêt Système 
LON] [C1). 


Pour tout dire, ce config permettra de choisir les 
autres librairies que l’on voudra Attacher (en les 
Attachant lui même pour ne pas exécuter leurs 
configs), ou Détacher (en ne les Attachant pas et en 
n’exécutant pas leurs configs). 


11 faut savoir que lors de l'appel de tout config il y a 
sur la pile tous les numéros des libs, dont on n’a pas 
encore exécuté le config, sous forme d’entiers 
système, plus le nombre total de ces numéros. 


Il suffit de remplacer certains de ces numéros par un 
numéro fixé (par exemple celui d’une librarie en 
ROM qui n’a pas de config, ici la lib numéro 3) pour 
que leur config soit "détournée".. 


Cette librairie s’appelle Config Picker. 


LIBATTACH prend en argument une liste de numéros de 
libairie à attacher (même si vous mettez un numéro 
de librairie inexistante, il n’y a pas de probleme). 


LIBDETACH prend une liste de numéros de librairie à ne 
pas attacher (même si vous mettez un numéro de 
librairie inexistante, il n’y a pas de probleme). 

Si vous voulez autoriser tous les configs, faites : 


€ 0 } LIBATTACH € O } LIBDETACH 


Si vous voulez attacher toutes les librairies, il suffit 
d’armer le flag 62. 


Si vous voulez que Config Picker s'attache, désarmez 
le Flag 63, si celui-ci est armé, Config Picker sera 
detaché... 





CHANGEN°LI8 prend un numéro de librairie inferieur à 
1792 et renumérote la librairie (attention ne pas 
donner le numéro d’une autre lib existante ou il 
risque d’y avoir des conflits) puis reboote. Notez que 
j'ai rendu impossible l'accès de cette fonction par la 
ligne de commande en ne mettant pas d’offset sur les 
noms de 11 caractères. 





Bug Connu : si vous donnez à votre librairie les 
numéros 4, 7, 8 ou 9 et que le flag 62 est armé, il 
apparait que la HP48G/X (version M) se rallume un 
seconde après lavoir éteinte. (La mienne est restée 
allumée comme cela environ une heure avant que je 
le voie !!!). De plus, pour tous numéros inférieurs à 
242, si le flag 62 est allumé, les librairies supérieures 
en Rom sont attachées, ce qui occasionne une lenteur 
lors de l’accès au menu Library. 





Le listing étant assez long je vous laisse decouvrir par 
vous même la structure de cette lib. J'ai essayé de 
faire un effort sur les commentaires... car ce n’est pas 
mon point fort. 


ASSEMBLE 
TOUTDES 
CON(5) #02840 * =DOLIB 
TAIL_LIB 
REL(5) FinL 
CON(2) 17 
NIBASC ‘Config Picker 1117 
CoNC2) 17 
Not 
CONC3) 1642  * Numéro de Librairie 
REL(5) HashTab * Offset sur Hash-Table 
REL(5) MsgTab * Offset sur Table des messages 
REL(5) LinkTab * Offset sur Table des Liens 
REL(5) Config * Offset sur Config 
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Config 


CON(5) 
CON(5) 
REL(5) 
GOSBVL 
c=0 


?AB1T=0 

GOYES 
FLag_62_Set 
A=DATI 
?A#O 
GOYES 
GoTo 
D0=A 
D0=00+ 
A=DATO 
CD1EX 
R3=C.F 
RO=A.F 
GOSBVL 
GOSBVL 
C=R3.F 
CDIEX 
CER2.F 
c=c+1 
R2=C.F 
LCHEX 
DAT1=C 
D1=01+ 
Goo 


NoFin 


Flag_62_Clear 
BCL R1=I 






GOYES 
A=DAT1 
ADIEX 
D1=01+ 
c=DAT1 
ADIEX 
8=C À 
A=PC 

CONÇ2) 
REL(5) 
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#02090 * =DOCOL 
#02DCC * =DOCODE 
FinConf igCod 

H#06798  * =SAVPTR 


* nombre de Lib a attacher 


* 


sauvegarde à pile 


* nombre de configs restant 


* à à drapeaux user 


Flag_62_Clear 


NoFin 
FIN 


A * 
A 
#06537 * 
#06798 * 
A 


sauvegarde D1 


SPUSH# : 
=SAVPTR 


depose numero 


* 


restore D1 


1 de + a attacher 
A * vire Le config de La Lib 


FLag_62_Set 


* fin des configs 


A * numéro de Lib 


#43 
ATTACH 


Bi 


FIN 


No15 
PUSH 





?ABIT=1 
GOYES 
CONC2) 


CON(5) 
RO=C.F 
GOSBVL 
GOVLNG 


Flag_63_Set 


NOMOR 


82 


NOHOR2 


REPL1 





LC) 
oc 


A=PC 
CONC2) 
REL(5) 
A=A+C 


A=0 
A=DATO 
CD1EX 
R3=C.F 
RO=A.F 
GOSBVL 
GOSBVL 
C=R3.F 


Libs a attacher 


x x Li 


* 


tous Les numéros ont 


NOMOR * ete examinés 


REPLI  * Les numéros correspondent 


nombre de Lib a attacher 
#53707 * à à drapeaux user 


2 
Flag_63_Set 
#43 


1642 a 
A 

#06529 * 
#2D564 * 


attache Config Picker 


=PUSH2# 
LOOP 


n'attache pas Config Picker 
PUSH 


#43 
NOTATTACH 


Libs à detacher 


tous Les numéros ont 
NOMOR2 * été examinés 


REPL2 * Les numéros correspondent 


nombre de configs restant 
BCL 


numéro Lib à attacher 


A * 
A 

#06537 * 
#06798 
A 


sauvegarde D1 


=PUSH# dépose numéro 

















CD1EX 
C=R2.F 
C=C+1 
R2=C.F 
REPL2 LCHEX 
DATI=C 
GoTo 


XLIB6 CON(5) 
REL(S) 

ATTACK 
CON(3) 
CON(3) 
CON(3) 

FAT 

XLIB7  CON(5) 
REL(5) 

NOTATTACH 
CON(3) 
CONC3) 


CONC3) 
FNAT 
FinConf igCod 
CON(5) 
CON(5) 
CON(5) 
CON(5) 


MsgTab CON(5) 
REL(5) 
CON(5) 
CON(5) 
CON(5) 
CON(5) 
NIBASC 


FinMT  CON(1) 
No3 CON(3) 
CON(3) 


XLIBO  CON(5) 
CON(5) 
CON(5) 
CON(5) 
CON(5) 


Noï2 CON(3) 
CON(3) 
CON(5) 


Noi7  CON(3) 
CON(3) 
CON(5) 


04000 


NOMOR2 


HO2AGE 
FAT 


HO2ALE 
FNAT 


#073C3 
#07709 
#07334 
#03128 


#029E8 
FinMT 
#02A2C 
1 

1 

43 


‘Library In Bad Port’ * Msg d'erreur 01 


8 
1642 


#02D9D 
#IBECE 
#04021 
#02090 
#02E92 


1642 
8 
#02E92 


1642 
4 
#02E92 


* 


* 


* 


* 


* 


* 


+ 


* 


* 


* nn * + 


* 


* 


* 


restore D1 


1 de + à attacher 


vire Le config de La Lib 


=DOHSTR 


nombre 

de xlib 
que vous 
voulez 
attacher-1 


=DOHSTR 


nombre 

de xlib 
que vous 
voulez 
detacher-1 


=ZERO DO boucle 
=TOSRRP attache 
=LOOP Libs 
SEMI 


=DOARRY * Array 


=DOCSTR * of String 
Dimension Tableau 
Nombre de MSG 
Taille Chaine 


commande 
numéro Lib 
numéro xlib 


=DOCOL 
=CK18Dispatch 

=FIVE prend une Liste 
=DOCOL en argument 
=DOROMP 


Controle que L'on 
est pas en port 2 
=DOROMP 


ListReel>ListSysBinary 
=DOROMP 


No4 


Nos 


No6 


No7 


XL181 


No13 


Noé 


Noë 


No9 


No10 


No11 


XLIB2 


CON(3) 
CON(3) 
CONC5) 


CON(3) 
CON(3) 
CON(5) 
CON(5) 


CON(3) 
CONC3) 
CON(5) 
CON(5) 


CON(1) 


CONC3) 
CONC3) 


CON(5) 
CON(5) 
CONC5) 
CON(5) 
CON(5) 


CON(3) 
CON(3) 
CON(5) 


CONC3) 
CONC3) 
CONC5) 


CONC3) 
CONC3) 
CONC5) 


CON(3) 
CON(3) 
CON(5) 
CON(5) 


CONC3) 
CON(3) 
CON(5) 
CON(5) 


CON(1) 


CON(3) 
CONC3) 


CON(5) 
CON(5) 
CON(5) 
CON(5) 
CON(5) 
CONC5) 


1642 
6 
#02E92 


1642 

5 
#03258 
#02E92 


1642 
4 
#03128 
#03128 


1642 


#02D90 
#IBECE 
#04021 
#02D9D 
#02E92 


1642 
8 
#02E92 


#02E92 


1642 

5 
#03258 
#O2E92 


1642 

3 
#0312B 
#03128 


1642 


#02D9D 
#IBECE 
#03FF9 
#02D90 
#1B8CEA 
#02E92 


* Entier Binaire des 


* 


* 


Libs a attacher 
=DOROMP 


* modifie Entier Binaire 


* 


* 


* 


* 


* 


* 


* 


* 


* 


* 


=2DROP efface List et Ent Bin 
=DOROMP 


Recalcul CRC 
=SEMI 
2SEMI 


commande 


numéro de Lib 
numéro de xlib 


=DOCOL 
=cK18Dispatch 
=FIVE 

=DOCOL 
=DOROMP 


* Controle Port2 ? 


* 


* 


* 


* 


* 


* 


* 


* 


* 


* 


* 


* 


* 


* 


* 


=DOROMP 


ListReel>ListSysBinary 
=DOROMP 


Entier Binaire DETACH LIB 
=DOROMP 


modifie Entier Binaire 
=2DROP efface List et Ent Bin 
=DOROMP 


Recalcul CRC 
=SEMI 
=SEMI 


commande 


numéro de Lib 
numéro de xlib 


=DOCOL 

=cK18Dispatch 

=ONE un reel 

=DOCOL 

ZCOERCE  Reel>SysBinary 
=DOROMP 
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Nol4 CON(3) 1642 
CON(3) 8 
CON(5)  #02DCC 
REL(5) Fincé 
GOSBVL #06641 
RO=A.F A 
GOSBVL #06798 
LCHEX 00700 
?A<C A 
GOYES  NOFIN3 
GOTO  FIN3 


NOFIN3 GOSUB 
REL(5) 
REL(5) 
REL(5) 
REL(5) 
REL(5) 
REL(5) 
REL(5) 
REL(5) 
REL(5) 
REL(5) 
REL(5) 
REL(5) 
REL(5) 
REL(5) 
REL(5) 
REL(5) Noté 
REL(5) No17 
CON(5) 0 


DON.No 
No 
No2 
No3 
No4 
No5 
Noé 
No7 
No8 
No9 
No10 
No11 
No12 
No13 
No4 
No15 


DON.No C=RSTK 
DO=C 
A=DATO A 
2A=0 A 
GOYES 
CDOEX 
A=A+C A 
DO=A 

A=RO.F A 
DATO=A X 
DO=C 

DO=D0+ 5 
GOTO  BCL2 


BCL2 


FIN3 GOTO  LBCRC 


FinCé CON(5) 
CON(5) 
CON(5) 


#21B4E 
#03128 
#03128 


XLIB3 
CON(5) 
REL(5) 
GOSBVL 


#02DCC 
Finc3 
#06798 





* 


* 


* 


* 


* 


* 


* 


* 


* 


* 


* 


* 


* 


* 


* 


* 


* 


* 


Lib en Port 2 ? 
DOCODE 


=POP# 


=SAVPTR 


numéro de Lib trop grand 


Liste 
d'offset 
Sur numéros 
de La Lib 
dans 

la Lib 


Liste finie 


à numéro 


change Le numéro 


offset suivant 


recalcule CRC 


WarmStart (ON-C) 
SEMI 
EMI 





recalcule CRC 
=DOCODE 


=SAVPTR 





LBCRC 


Finc3 


XLIB4 


XL185 


BCL1 


A=PC 
CONC2) 
REL(5) 
A=A+C 


GOSBVL 
DATO=A 
GOSBVL 


CON(5) 
CONS) 
CON(5) 
CON(5) 
CON(5) 
CON(5) 
CON(5) 
CON(5) 
CONC5) 
CON(5) 
CON(5) 
CONS) 
CON(5) 
CON(5) 
CON(5) 
CON(5) 


CON(5) 
REL(5) 
GosvL 
A=DAT1 
D1=D1+ 
c=DATI 
D1=A 
D0=C 
D1=D1+ 
A=DAT1 
D1=D1+ 
B=A À 
B=B-CON 
Goc 
D0=D0+ 
A=DATO 
LCHEX 
?A#C 
GOYEs 
DO=D0+ 
A=DATO 
DAT1=A 
D1=D1+ 











#43 
TAIL_LIS 


#0597E 
4 
#05143 


#02D9D 
#OS4AF 
#61891 
#11006 
#03188 
#073C3 
#628EB 
#03325 
#62169 
#63846 
#18CEA 
#06657 
#03223 
#07334 
#05459 
#03128 


#02DCC 
FinCod 
#06798 
A 
5 
A 


A,10 
FINI 
5 

A 
02911 
A 
FINI 
5 


* 


taille Lib 


* 


=DoCRCc 
nouveau CRC 
=GETPTRLOOP 


* 


* 


ListReel>ListSysBinary 
=DOCOL 

ZINNERCOMP 

=DUP#0=case 

* WRONGCOUNTERR 


* 


* 


* 








* =DUPTYPEREAL? 
* =NcaseTYPEERR 
* =COERCE 





* modifie Entier Binaire 
* =DOCODE 


* 2SAVPTR 
* à Entier Bin 


* à Liste SB 


* taille Ent Bin 
#- taille - vide - premier + 1 
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Goc 
GOTO 


FINT C=0 
DATI=C 
GOSBVL 

FinCod1 


XL1B8 


CON(5) 
REL(5) 
A=PC 
CON(2) 
REL(5) 
A=A+C 
ADOEX 
DO=D0+ 
C=DATO 
ADOEX 
A=C 
LCHEX 
?A2C 
GOYES 
CON(4) 


No2  CON(3) 
A=C 
GOVLNG 


NOTP2 LOOP 
FinCod4 


HashTab 
CONC5) 
REL(5) 
CON(5) 
CON(5) 
CON(5) 
CON(5) 
CON(5) 
CON(5) 
CON(5) 
CON(5) 
REL(5) 
CON(5) 
CON(5) 
CON(5) 
CON(5) 
CON(5) 
CON(5) 
CON(5) 
REL(5) 

NOM_DE_9_CHR 
CON(2) 
NIBASC 
CON(3) 
CON(2) 


FIN 
BcL1 


A 
x 
#05143 * =GETPTRLOOP 


* 


Controle Lib en Port 2 ? 
* => Erreur 

#O02DCC * =DOCODE 

FinCodé 


#43 
TOUTDEB 
A 


* 


à debut de Lib 


A 
02840 
A 
NOTP2 


* 


si Le prologue est bon 
# on est pas en port 2 


#0143 * LC NoErreur 
1642 
A * sinon Erreur 


#05023 * =Errjmp 


HO2AGE * =DOHSTR 
FinHashTab 
0 


0000000 


NOM DE_9_CHR 


* pas d'offset a 11 


0000000 


Offset1 


9 
TLIBATTACH' 
0 
9 


NIBASC ’LIBDETACH' 
CONG3) 1 
NOM_DE_11_CHR 
con«2) 11 
NIBASC  ‘CHANGEN°LIB/ 
CON«3) 2 
offset1 
CON(5) #00049 * offset negatif ( -REL(5) ) 
CON(5) #00037 * on doit Les calculer 
CON(5) #00025 * a La main ... 
FinHashTab 
LinkTab 
CONCS) #OZAGE * =DOHSTR 
REL(5) FinLinkTab 
REL(5) XLIBO  * offset 
REL(S) XLIB1 * sur 
REL(5) XLIB2 * tous 
REL(5) XLIB3 * Les 
REL(5) XLIB& * xlibs 
REL(5) XLIB5S * de 
REL(S) XLIB6 * La 
REL(5) XLI87 * Librairie 
REL(5) XLIB8 
FinLinkTab 


CRC CON(4) #0000 * CRC 
Finl 
RPL 


Une fois la librairie assemblée, il faut exécuter ce 
petit programme pour calculer pour la premiere fois 
le CRC (librairie au niveau 1 , lancer ce programme). 


CON(5) #O02DCC * =DOCODE 

REL(5)  FinCode 

GOSBVL #06798 * =SAVPTR 

A=DATT A 

DO=A 

DO=D0+ 5 

A=DATO A 

ASA-CON À, 

CDOEX 

GOSBVL #0597E * =DoCRCc 

DATO=A 4 

GOSBVL #05143 * =GETPTRLOOP 
FinCode 





Maintenant vous pouvez stocker la librairie en Port. 


La librairie donnée dans le coin des codes permet de 
donner des listes de 30 librairies à attacher ou à 
détacher. NDLR : Suite aux délais de mise en pages de ce JPC, 
le listing du "Coin des codes" est soumis aux mêmes remarques 
que celui cité dans l'article "Voyage. Code Nul”. Référez vous 


donc à cet article pour un bon transfert sur votre HP48. 


Pierre Silvestre de Sacy (572). 
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CHOC EN RETOUR 


Dans l’article programme bizarre … (JPC-90 p16) et 
dans le paragraphe principe du programme au lieu de: 
nit/div” 
il fallait lire: 
nl/dr 
et ainsi de suite 


J'ai pu constater que l’utilisation de ASC-, qui parut 
dans JPC-79 page 11, posait parfois des problèmes 
avec certaines structures de programmes. Cela est dû 
au début du programme. Pour que se soit correct il 
faut ajouter CK1NoBlame juste devant CK&DISPATCHO. Le 
début du fichier source devient donc: 





CK1NoB Lame 
CK&D ISPATCHO 





Pour ne pas retaper le code vous pouvez utiliser le 
programme suivant: 


MODIFASC-+ 

cksum # 9984h 131 octets 

« 
lASC-+' RCL BYTES DROP # FC91h # 
IF THEN # 203h DOERR END 
"D9D20D2951" ASC! RCL 
ASC 6 OVER SIZE SUB + 
ASC 





Sinon le code se trouvera dans le coin des codes. 


Guy Toublanc (276) 
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HP95 / HP100 


J. Belin 
J. Belin 
J. Belin 
J. Belin 


PC de Poche : HP100 & 95LX 
Configuration commune des cartes Ram 
Conversion d'images (Acte II) 
Commande de sélection de mode écran 


Le coin des codes 





22 
24 
26 
27 


29 
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PC DE POCHE : LE LIVRE 


Alors que de nombreux livres ont été écrits en France 
pour les HP28 et HP48, les HP95 et HP100 avaient 
jusqu’à présent été oubliés. 


Cette ommission est maintenant corrigée, puisque un 
livre dédié à ces machines est maintenant disponible. 
Son titre est PC de Poche : HP100 & 95LX. Ecrit par 
Luc Smeesters, il est édité par Dunod au prix de 
145 Francs. 





Cependant, alors que les livres consacrés aux 
machines précédentes dépassent souvent les 500 
pages et sont plutôt orientés sur la programmation 
sous toutes ses formes, celui-ci ne dépasse pas les 170 
pages et se destine plutôt (ainsi que le dit l’auteur 
dans son introduction) aux utilisateurs débutants et 
aux acheteurs potentiels. 





Ensuite, le livre est constitué de deux parties 
principales : La première présente les machines et 
l'utilisation des applications intégrées. La seconde 
partie contient une présentation de produits et 
logiciels adaptés aux deux machines. 


Parcourons maintenant les différents chapitres. 
Palmtops : Pour qui ? Pour Quoi ? 


Sous ce titre, ce chapitre retrace en fait l’histoire et 
l’évolution des ordinateurs de poche, ainsi que leur 
différences  fonctamentales par rapport aux 
ordinateurs portables. Les Canon X07, Psion 
Organizer, Poget, Atari Portfolio, Psion Série 3, 
HP95, Sharp PC3000 et HP100LX y sont donc 
brièvement décrits par ordre chronologique. Ensuite 
l’auteur décrit brievement ce que pourait être le futur, 
avec l'apparition récente des PDA. 





Ma seule observation dans cette partie serait 
peut-être que le HP-71 a été oublié dans ce 
panorama. Après tout, il possède surement plus le 
titre d’ordinateur de poche que le Psion Organiser, et 
c’est aussi un peu l’ancêtre du HP95... 


Compagnon du PC 


Après avoir bien dit qu’il était illusoire de demander à 
un palmtop les mêmes services et performances qu’à 
un PC, l’auteur décrit de façon assez détaillée les 
deux HP (Ecrans, claviers, Communications...). 
Cependant, et c’est peut être un oubli de sa part, il n’y 
a aucun mot dans cette partie sur l'unité centrale 
(types de microprocesseurs...). Cela aurait peut être 
été intéressant pour un débutant. 


Par contre, la partie consacrée à l'alimentation 
électrique est bien traitée, avec quelques courbes de 
décharge des types de piles et des conseils 
d'utilisations. 


Ce chapitre contient aussi une courte description de 
la norme PCMCIA et donne les différents types et 
versions admises pour chaque machine. Pour une fois, 
l'auteur n’est pas tombé dans le piege consistant à 
confondre type et version. Ce qu’on en peut pas dire 
pour de nombreux journalistes ou distributeurs... 


Enfin, cette partie ce termine par quelques mots 
concernant la protection de la machine par password, 
avec quelques conseils sur la façon de les choisir. 


Logiciels Intégrés 


Après une petite explication sur ce qu'est un 
“ordinateur" (son mode de fonctionnement, ses 
différents composants...) et du vocabulaire de base du 
MS-Dos, l’auteur décrit brièvement l'interface du 
Système Manager, pour les deux machines. 


Ensuite, il nous décrit de façon assez détaillée les 
différentes applications intégrées Setup, Filer, 
Editeur, Agenda... 


Bien sûr, pour un utilisateur expérimenté, cette partie 
semblera au premier coup d’oeil n’être qu’un résumé 
des notices d'utilisations des deux machines. 


Cependant, nous avons ici (en plus des 
renseignements de base) de nombreux conseils 
pratiques ou trucs d'utilisation qui intéresseront 
souvent des utilisateurs expérimentés. Par exemple, la 
suggestion d’une petite syntaxe normalisée dans les 
fiches de lagenda. Il y a aussi un petit script 
permettant de remplacer le bip d'alarme par l'hymne 
Européen ! Contenant malheureusement une petite 
fausse note que je vous laisse trouver par vous 
même... 


Mon seul regret dans cette partie serait qu’il aurait 
été intéressant, pour les utilisateurs de HP100, d'y 
voir une initiation au RPN, puisque celle-ci a disparue 
de la notice de cette machine. 


Interconnexions 


Ce chapitre décrit succintement (un peut trop, peut 
être) les différents accessoires permettant de 
connecter les palmtops HP à des ordinateurs : Les 
kits de connections HP (émulation des machines sur 
PC, conversions des fichiers HP95/HP100...), la 
transmission par infra-rouge avec les Compatibles 
HP-XM et le kit de connection HP-Maclntosh de 
Dataviz. 














Accessoires Matériels 


Pour les utilisateurs expérimentés, ce chapitre et les 
suivants seront probablement ceux qui les 
intéresseront le plus. En effet, même les lecteurs 
assidus du catalogue EduCALC y ferons quelques 
découvertes. De plus, de nombreuses photos 
montrent l'aspect de certains d’entre eux. 


Suivant une petite présentation de deux étuis de 
protection de la machine, l’auteur présente en 
quelques mots les différents types de mémoire (Rom, 
Ram, Flash...). 


Ensuite, suit une présentation de différents produits 
ou technologies dont les lecteurs de disquettes 
portables, les cartes d’interface PCMCIA/SCSI ou les 
lecteurs de cartes sur PC, puis quelques imprimantes 
portables (Diconix, Citizen PN48 et BJ10), avec les 
indispensables convertisseurs série/parallèle. 


Une autre grande section est ensuite consacrée aux 
modems, avec d’abord une bonne introduction 
technique suivie d’un petit exposé des différences 
existant entre le HP95 et le HP100 dans ce domaine. 
Pour le première machine, le WorldPort d'US 
Robotics et le modem PCMCIA de NewMedia sont 
bien sûr cités. Ensuite nous trouvons quelques mots à 
propos des autres types de moyens de 
communications tels que le "pager” de Motorola. 


Suivent ensuite quelques périphériques plus 
exotiques, tels que le Linalyzer de ByteCom que je ne 
connaissais pas. Il s’agit d’une interface permettant au 
HP95 d’analyser le comportement et la précision 
d'une alimentation secteur 220V. L’interêt du HP95 
étant que son alimentation par pile l’isole totalement 
de la source electrique et lui permet de cotinuer de 
travailler en cas de coupure du secteur. D’autres 
périphériques sont cités, comme les lecteurs de 
code-barre ou de cartes PCMCIA, et les systèmes de 
réception radio (Alphapage ou système GPS. 


Programmes d'applications 


En ce qui concerne les logiciels, l’auteur cite tout 
d’abord quelques application commerciales (Pocket 
Sales Forces, ACT!...), indique que le monde médical 
est aussi touché par la "HP-ite aiguë" et presente 
Derive en quelque mots. Puis au cours d’un courte 
présentation des languages développés pour le HP95, 
il a la bonne idée de parler du travail de notre ami 
Craig Finseth (l’auteur de MEMUTIL et FREYJA) et de 
laisser ses coordonnées. 


Pour terminer (et après avoir dit qu’on pouvait aussi 
jouer sur son HP !), il nous indique qu’il est possible 


d'obtenir de nombreux programmes par 
l'intermédiaire de serveurs tels que Compuserve. 


Cependant, une première lecture de ces trois derniers 
chapitres donne une sensation de manque à un 


utilisateur averti Une rapide relecture lève 
rapidement le doute : certaines sociétés parmi les plus 
importantes dans le monde HP, telles que 
SPARCOM, ont été totalement oubliées. Par 


exemple pour cette société (dont Maubert importe la 
majorité des produits), on omet de citer son kit de 
connection Macintosh, alors qu'on cite le 
MacLinkPLus de Dataviz, qui est 40% plus cher... De 
même il n’y a rien sur le Drive95 (qui est disponible 
chez plusieurs revendeurs Français dont la Fnac) 
alors qu’on parle à la place du HandyDisc qui est 
beaucoup plus difficile à trouver. D’autres sociétés 
importantes ont aussi été oubliées, par exemple ACE 
et TDS... De même, en ce qui concerne les lieux où 
l'on trouve des programmes, il ne semble connaitre ni 
le Palmtop Paper ni l'existence des clubs utilisateurs 
qui sont pourtant d’un coût de revient très inférieur à 
CompuServe.. 


Annexes 


Enfin, on trouve en annexe quelques renseigmenents 
intéressants tels que le brochage des connecteurs 
séries ou des informations sur les codes de 
commande des modems. 


Cependant, certaines de ces annexes laissent un peu 
perplexe. Par exemple, la première a la bonne idée de 
présenter les fichiers APNAME.LST, choses absentes dans 
la documentaion fournie par HP. Le problème est 
que la création de ces fichiers est déjà difficile à 
maitriser (tous les utilisateurs peuvent en 
témoigner !) et que l’auteur non seulement ne donne 
aucun conseil réél sur eux (par exemple le fait qu'il 
est indispensable de taper les noms de fichiers en 
majuscules), mais ajoute des éléments pouvant 
induire le pauvre utilisateur en erreur ! 


La première erreur est de présenter la syntaxe de la 
ligne du fichier ainsi : 


[Unité:Répertoire\Programme.EXM [code Touche] [Descripteur][RC] 


Tout informaticien débutant sait que les crochets 
servent à indiquer un paramètre optionnel. Le 
problème est que sur le HP95, tous les paramètres de 


la ligne sont obligatoires ! 


La seconde chose pouvant induire les utilisateurs en 
erreur se trouve dans la liste des codes de touche. Si 
ces codes en eux-mêmes sont exacts, il aurait fallu 
indiquer (par une marque) les touches qui peuvent 
être effectivement utilisables comme "Hot Key" dans 








JPC 92 Page 23 — 





APNAME.LST, Car certaines d’entre elles (par exemple la 
plupart des combinaisons tshift] +Touches bleues) 
ne sont pas utilisables dans ce fichier. 


Enfin la dernière partie, donnant une liste de 
fournisseurs de logiciels et périphériques, laisse tout 
aussi perplexe. En effet, si on y voit de nombreuses 
société Européennes (dont certaines me sont 
inconnues), comment ce fait-il qu'aucune société 
Américaine n’y soit directement mentionnée ? 
Sparcom, ACE ou TDS sont pourtant les principales 
compagnies fournissant des extensions pour ces 
machines ! Bizarre. De plus, à moins de connaitre ces 
sociétés, il n’est pas vraiment possible de savoir 
exactement qui fait quoi car si le nom des produits est 
cité dans les presentations, la société productrice l’est 
rarement. Ce qui rend impossible l’utilisation de cette 
liste. Par exemple, il est cité (dans sa présentation) 
que CONTACT95 est créé par des Francais. 
Heureusement qu'il n’y a qu’une seule société 
Francaise conceptrice de logiciels dans cette liste, car 
autrement comment en déduire que Dynaxx en est la 
source ? En fait cette déduction nous est simplifiée 
par le fait que les logiciels financiers de Bruckert sont 
brievement décrit, mais sans aucune mention de ce 
nom, que ce soit dans la description ou dans la liste. 
Enfin, certaines produits et sociétés cités 
(Compuserve, par exemple) n’y sont pas du tout 
listées, alors qu’elles ont souvent une adresse en 
France. 


En résumé, ce livre devrait servir son but : inciter les 
acheteurs potentiels et aider les débutants. Il devrait 
aussi bien aider à faire comprendre les différences 
entre le HP95 et le HP100 en ce qui concerne les 
différences dans les possibilités internes et les 
extensions possibles. Il devrait même intéresser de 
nombreux utilisateurs expérimentés par les petits 
trucs qui y sont cités dans la première partie. Par 
contre, pour ces mêmes utilisateurs, au courant des 
différents accessoires diffusés, ses nombreuses 
ommissions et erreurs dans la deuxième partie ne 
peuvent que donner une impression de manque de 
préparation, et peut-être la présence d’un certain 
parti-pris. Et c’est dommage, car l’idée de base était 
bonne... 


Jacques Belin (123) 





DUEL DE CARTES 
HP95 / HP100 


Au cours de notre derniere réunion, un de nos 
utilisateurs de HP95, se trouva fort ennuyé lorsque il 
voulut booter, avec son nouvel HP100, sur sa carte 
Ram configurée pour son HP95, 


Le symptome consécutif a cette manoeuvre était 
lapparition du message suivant : 


Bad or missing Command Interpreter 


N'ayant pas alors le temps de chercher la cause de ce 
problème, ma première réaction fût d'utiliser la 
possibilité qu’a le HP100 de laisser choisir le disque 
de boot, afin de le faire redémarer à partir du disque 
Rom. 


Ce n’est que le lendemain, repensant a ce problème 
que j'en trouvais la cause exacte. L’erreur se trouvait 
dans le fichier CONFIG.SYS, à la ligne : 


SHELL=C:\COMMAND.COM /E /P:512 


En effet, si cette ligne est valide sur le HP95, elle ne 
peut en aucun cas fonctionner sur le HP100 puisque 
le fichier COMMAND.COM est maintenant situé dans le 
répertoire \DOS de l'unité D ! 





Ceci m'ammena à la question suivante : comment 
faire en sorte que les personnes ayant accès aux deux 
machines puissent booter sur la carte de de façon 
tranparente ? 


Si cette question peut paraitre une hypothèse d’école 
(puisqu'il semble peu logique que les possesseurs des 
deux machines continuent a utiliser leur HP95). 
Cependant, cela pourrait être intéressant dans le 
cadre de nos réunions, ou de nombreux échanges 
peuvent se faire. Cet article a donc pour but de 
montrer une méthode de configuration, en espérant 
que les habitués en tiennent compte. 


Adaptations du fichier CONFIG.SYS 


MS-DOS ne permettant pas de faire des tests ou des 
sauts dans le fichier CONFIG.SYS, il n’y a pas de moyen 
d’influer sur son déroulement. Nous n’avons donc 
aucun moyen de sélectionner les bonnes coordonnées 
du fichier... 


Une solution pouvant venir a l'esprit serait de copier 
le fichier COMMAND.COM sur la carte et de modifier 
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le CONFIG.SYS en conséquence. En fait, cette solution 
est à éviter, pour plusieurs raisons : 

- Le fichier COMMAND.COM est dépendant de la 
version du DOS. Les deux HP ayant une version 
différente du système d’exploitation, il y aura donc 
une incompatibilité pour les deux machines. 

- Même si ce probleme ne se posait pas, il faut savoir 
que (sur les deux HP), ce programme n’est en fait 
qu’un "Loader", faisant un saut dans la Rom, où se 
trouve réellement le code du programme. L'adresse 
de destination du saut n’etant pas la même suivant les 
machines (peut être même suivant les versions d’une 
même machine), le plantage est assuré. 

- Enfin, si vous déclarez le fichier COMMAND.COM sur 
la carte et que vous tentez d'utiliser la machine 
lorsque cette carte est absente (ou que vous ayez une 
autre carte insérée), vous aurez aussi un plantage. 


Afin de contourner ces problèmes, j'ai donc choisi 
une solution radicale : copier le fichier 
COMMAND.COM du HP100 dans le répertoire racine 
du disque C. Cela n’est peut être pas élégant, puisqu'il 
faut "préparer" le HP100 récepteur de la carte, mais 
c’est ce qu’il y a de plus simple. De toutes façons, ce 
fichier ayant une taille de moins de 512 octets, elle est 
probablement la plus economique. 


Un autre partie du fichier HP95 peut sembler poser 
un problème. Il s’agit de la ligne : 


COUNTRY=33 


Lors de la sequence boot, le HP100 affiche 
fugitivement le message : 


Bad or missing \COUNTRY.SYS 


En fait, nous pouvons ignorer ce problème, car le 
HP100 gère les informations nationnales à l’aide du 
programme KEYBEZ, pouvant être lancé dans le fichier 
AUTOEXEC.BAT (voir page 22-13 de la doc du HP100, 
ou l'exemple plus bas). 


Notez cependant qu'il existe un problème que je n’ai 
pas réglé, c’est la désactivation de l'installation de 
certains drivers sur l’une ou lautre des deux 
machines. Par exemple, 958UDDY qui n’est pas utilisable 
sur le HP100. Quelqu'un aurait-il une idée ? 


Modifications du fichier AUTOEXEC.BAT 


Si il n’est pas possible d’influer sur le fonctionnement 
du fichier CONFIGSYS, nous mavons pas ces 
problèmes pour le fichier AUTOEXECBAT. La 
question est ici : Comment savoir sur quelle machine 
est exécuté ce fichier ? 


Il est possible d'utiliser un programme nommé 1595 
qui renvoie la valeur 1 si il est utilisé sur le HP95. 
Cette valeur pouvant être testée grace à la fonction 
ERRORLEVEL du Dos. 


Cependant, je vous propose une autre méthode, qui 
possède lavantage de ne pas nécessiter de 
programme exterieur. Elle consiste à utiliser un test 
du type 1F [NOT] EXIST permettant d'effectuer un 
action suivant l'existence (ou l’abscence) d’un fichier. 


Dans le cas qui nous intéresse, il s’agit de faire ce test 
sur un fichier dont on sait qu’il n’est présent que sur 
une seule des deux machines. Notez que le type ou le 
contenu du fichier n’a aucune importance, puisque la 
seule chose qui nous intéresse est son existence. 


Pour ma part j'ai porté ma préférence sur un des 
deux fichiers exemples de Lotus, présent dans le 
répertoire racine du disque C. Ces fichiers étant 
présents (à ma connaissance) dans toutes les versions 
du HP95 et absents du HP100, ils offrent toutes les 
garanties nécessaires. 


Pratiquement, nous utiliserons une structure de 
programme telle que celle-ci : 


(Début du fichier) 


IF NOT EXIST C:\_cflow.wk1 goto hp100 
:HP9S 
2 (Code d'initialisation HP95) 


GOTO common 
:HP100 
. (Code d'initialisation HP100) 


:common 
. (Suite de l'initialisation) 


Notez bien que même si vous n’avez pas de suite pour 
Putilisation, le label (et son instruction de 
branchement) doivent tous deux exister. Dans le cas 
contraire, le code destiné au HP100 serait exécuté par 
le HP95, à la suite de celui destiné à cette machine. 


A titre d'exemple, voici un exemple de fichier 
sensiblement équivalent à celui que j'ai défini pour 
mon usage personnel : 


@echo off 
cls 
PROMPT $P$G 
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IF NOT EXIST C:\_cflou.uk1 goto hp100 
:HP9S 
PATH=A:\BIN;A;\BIN95;C:\;C:\_SYS;C:\D0S 
GOTO common 

:HP100 

PATH=A:\BIN;A:\B1N100;D: \DOS;D:\BIN 
keybez fr 

:common 

SET TMP=a:\TMP 

SET TEMP=a:\TMP 

serctl /o 

ctype /ea 

ashel195 -sx 


Vous pouvez constater que dans les deux déclarations 
du PATH, j'ai spécifié (en plus d’un directory 81N), deux 
directories 8IN95 et BIN100. Cela permet d’avoir des 
programmes ayant le même nom, mais spécifiques à 
chaque machine (des commandes DOS 3.2 et 5.0, par 
exemple). 


Jacques Belin (123) 





CONVERSION D'IMAGES 
ACTE II 


Le mois dernier, je vous ai présenté une méthode 
permettant de convertir des fichiers graphiques, afin 
de les visualiser sur le HP95. 


Ce mois-ci, je vous propose de faire la même chose 
pour le HP100LX, toujours en utilisant le programme 
Graphic WorkShop. 


Le principe général étant quasiment le même que 
pour le HP95, je ne me bornerai ici qu’à expliquer les 
différences pour le mode CGA. Je vous engage donc 
à vous reporter sur Particle du mois dernier pour 
l'explication de certaines étapes. 


Cependant, alors que le HP95 ne supporte que des 
images monochromes, le HP100 et son mode CGA 
permettent aussi d’afficher des images en 4 niveaux 
de gris. Dans le premier cas la résolution est de 
640x200, dans l’autre 320x200. Je vous expliquerai 
donc les étapes nécessaires permettant d’arriver aux 
deux formats de fichiers. 





Notez aussi que nous devons actuellement considérer 
le format 4 niveaux de gris du point de vue théorique, 
car je n’ai pas trouvé actuellement de programme 
permettant d’afficher des fichiers 4 niveaux de gris sur 
le HP100. En fait, de nombreux utilitaires sont sensés 
le faire, mais ils ne produisent pas le résultats 
escompté ou plantent la machine. D’autres 
programmes devraient fonctionner, mais leur taille 
(plus de 100ko) est excessive pour la taille mémoire 
de la machine. Je poursuis donc mes recherches. Si 
vous possédez un tel utilitaire fonctionnant 
convenablement sur le HP100, n’hésitez pas à me 
prévenir. Dans le cas contraire, il faudra encore que 
je sorte mon assembleur, mais ceux qui sont venus 
aux dernières réunions savent que j'ai déjà commencé 
à travailler dans ce domaine. 


D'autre part, j'ai constaté que pour certaines images, 
il était plutôt préférable les convertir en monochrome 
plutôt qu’en 4 niveau de gris, car ce format a quelques 
fois tendance à "écraser" tous les détails. 


Conversion initiale 


Comme pour les fichiers décrits dans Particle 
précédent, Il est conseillé de convertir l'image 
originale en format GIF 256 Couleurs. 


Conversion en image tramée, 640x200 


Tout d’abord, si vous désirez un petit aperçu du gain 
de résolution par rapport au HP95, reportez vous tout 
simplement aux illustrations du mois dernier, car la 
première image à la même résolution que ce que 
nous allons obtenir. Toutefois, l'écran du HP100 étant 
plus large que celui du HP95 (de 7 mm), nous aurons 
légèrement plus de pertes dûes au passage en 
"Cinémascope". 


Conversion en image anamorphosée, 640 colonnes 


Même si la largeur de l'image originale est de 640 
colonnes, il est toutefois nécessaire de passer par 
cette étape afin de l’anamorphoser. 


Je vous avais présenté la dernière fois une formule 
permettant de connaitre la hauteur de limage 
intermédiaire. La voici pour le HP100 : 


nb_lignes 


0.86 


= * LS 





Lignes = 640 * 
nb_colonnes  format_pixel 
Ce qui donne pour les tailles courantes de fichiers : 


320x200 - image de 640x344 
640x400 + image de 640x344 





—— JPC 92 Page 26 











640x480 + image de 640x413 
800x600 + image de 640x413 


Conversion en image 640x<200 


Utilisez la même méthode que le mois dernier 
(fonction crop). 


Conversion en image monochrome tramée 


Avant de convertir limage en monochrome, 
rapelez-vous que vous pouvez toujours modifier 
certains paramètres de l’image (couleur, contraste) 
afin d'affiner la qualité de l'image finale. Ceci est 
aussi valable pour la conversion en 4 niveaux de gris. 


Ensuite, il suffit d’utiliser la même méthode que le 
mois dernier : le Dithering (accessible par la touche 
[F3]. 

Conversion en image 320x200, 4 niveaux de gris 

Par rapport à la partie précédente, il y a deux 
différences : la résolution horizontale et l'étape de 
conversion des couleurs. N'oubliez pas d'utiliser la 
fonction crop entre les deux. 


Conversion en image anamorphosée, 320 colonnes 


La méthode est strictement identique à précédement, 
si ce n’est que la formule de conversion est ici : 


nb_Lignes 1.72 





Lignes = 320 * -- 
nb_colonnes 


format_pixel 


En fait, le résultat est le même que pour le mode 
640x200, puisque le fait que nous ayons une résolution 
horizontale deux fois moindre est contrebalancée par 
le fait que chaque pixel d’information est affiché sur 
deux pixels physiques de l'écran. 


Conversion en 4 niveaux de gris 


L'option à utiliser ici est quasiment la même que celle 
que vous avez peut-être utilisé pour l'étape de 
préparation de l’image, si vous aviez un fichier 
graphique de plus de 256 couleurs. Utilisez donc la 
fonction Special Effects, accessible par la touche 
tF91, puis sélectionnez l’option Grey Scale, puis 
4 Levels et enfin le format de fichier PCX. 


Inversion de l’image 


Que vous ayez une image monochrome ou en 4 
niveaux de gris, il vous reste toujours à rendre l’image 
en “négatif”. Bien que le HP100 permette d’inverser 
l'écran (avec la combinaison de touches 1ON11/1), 


cette étape est conseillée, car vous éviterez ainsi une 
manipulation de touches. Le fichier résultant sera 
bien sûr en format PCX. 


Visualisation de l’image sur le HP100 


Si vous n’avez pas d’utilitaire de visualisation de 
fichier PCX, la méthode la plus simple est de 
redéfinir le Topcard. Comme pour le HP95, cela se 
fait dans l’application SETUP. 


Malheureusement, le HP100 n’accepte pas que le 
TopCard soit en 4 niveaux de gris. Pour ces fichiers, il 





nous faut donc vraiment utiliser un utilitaire 
spécifique. 
Donc, affaire à suivre... 
Jacques Belin (123) 
UNE COMMANDE A LA MODE 


Dans le directory \8IN du disque D du HP100 se 
trouve une commande MONO8025.COM qui n’est pas 
documentée dans le notice de la machine. Son rôle est 
de faire passer l'écran en mode 80x25 et de modifier 
la palette de niveaux de gris, afin de rendre l'écran 
plus lisible avec certains programmes. 


Cependant, hormis cette commande restreinte à un 
seul mode, nous n’avons aucun moyen de contrôler la 
taille de l'écran autrement qu’en pressant les touches 
£FntJ 1Z00M]. Cela aurait pourtant été intéressant de 
pouvoir configurer de façon logicielle (dans un fichier 
batch) le mode d'affichage avant et après l'exécution 
de ces programmes. 


C’est pour cela que j'ai créé la commande SCRN100.COM 
que je vous présente aujourd’hui. 


Sa syntaxe est la suivante : 
SCRN100 € 8 [6 | 473 


Ceci veut dire qu’elle admet l’un des paramètres 8, 6 
ou 4 indiquant que l’on veut passer respectivement en 
mode 80, 64 ou 40 colonnes. 


Fonctionnement du programme 


Le principe de programme est simple, puisque il s’agit 
en fait d’utiliser la fonction standard du Bios de IBM 
PC permettant de sélectionner le mode vidéo courant. 
C’est la fonction 0 de l'interruption 10. Le mode 
désiré se place dans le registre AL 
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Normalement, sur un IBM PC, il est possible de 
connaitre le mode vidéo courant en utilisant la 
fonction OFh de l’'int 10h. Ou plus directement en 
lisant l’octet situé à l'adresse 40:49. Cependant, afin 
de garder une parfaite compatibilité des programmes, 
les développeurs du HP100 on préféré indiquer le 
mode réél dans un octet situé à l'adresse 40:9F, et 
renvoyer toujours la valeur de mode "3" dans les 
fonctions standard. 


Si on teste l’octet situé en 40:9F, en faisant varier le 
nombre de colonnes d’affichage, le HP100 rapporte le 
code 3 pour le mode 80 colonnes, 81h pour le 60 
colonnes et 85h pour le 40 colonnes. Or, suite à 
quelques tests j'ai constaté qu’il était préférable 
d'utiliser les codes 80h au lieu de 81h et 84h au lieu 
de 85h. Ceci parce qu'il semble qu’en sortie de 
certains modes vidéos, le passage dans un autre mode 
n’est pas effectué... 


En fait, le HP100 se révèle très "chatouilleux" dès 
qu'on manipule certains modes vidéo. Désagréments 
qui peuvent aller jusqu’au plantage “dur” du HP100. 
Par exemple, certains problèmes pouvant survenir en 
sortie du mode graphique compatible avec celui du 
HP95 si on utilise certains programmes tels que 
askELL95. La cause semble dûe au fait que le HP100 a 
peut être un bug sur la gestion du mode numéro 7 
(texte 80x25, monochrome) qui est utilisé par le HP95 
(le HP100 utilisant le mode numéro 3). Il en résulte 
que certains programmes fonctionnant parfaitement 
sur HP95 posent des problèmes sur le HP100. Je n’ai 
pas encore trouvé la raison exacte de ce 
dysfonctionnement, mais je vous tiendrais au courant 
dès que j'aurais plus de détails. En attendant, j'ai 
constaté que si on créait un fichier batch appelant le 
programme graphique puis la commande SCRN100, il 
n’y avait plus de plantage... Je vous encourage donc a 
faire ainsi si vous avez des problèmes équivalents. 


Pour terminer, si vous regardez bien le listing du 
programme, vous constaterez que la routine de test 
limitant lutilisation de la commande aux seuls HP, 
autorise aussi l’utilisation sur HP95. Cela est 
intentionnel, car cela nous permet de l’inclure dans 
des fichiers batch de lancement de programmes 
pouvant être utilisés sur les deux machines, sans 
afficher de message d’erreur. J’ai bien sûr vérifié qu’il 
n’y avait aucune action de la commande sur le HP95. 


Listing du programme 


DOSSEG 
code segment para CODE’ 
assume cs:code,ds:code 
oRG  100h 
start: jmp main ; Saut sur première inst. 


usage 


Not_100 


main: 


D8 
LE 
LE 
D8 


mov 
int 


jne 











cmp 
jne 


mov 
imp 





jne 


mov 
jmp 





main_8: 


error: 
err02: 


exit: 


Code 


jne 


xor 
mv 
int 
im 


mov 
mov 
int 
mov 
int 
ends 
END 


"usage : 


13,10,10,"8" 
“This program runs only on an HP100LX" 
13,10,"8" 


ax, 4ddéh 
15h 

bx, "HP 
main_2 
ch,1 

main 3 
dx,OFFSET 
err02 





si,128 
al,1 


error 


ch,ch 
cl,al 


al,"" ; si caract # espace. 
main 5  ; passe à La suite de L'analyse 
cx ï Si encore des espaces. . 
main_4 on boucle 
error 3 --sinon erreur 
ï ANALYSE SIMPLIFIEE PARAMETRE 

al,"B"  ; si parametre = "8" 
main_6 non, on passe 
dl,03h sinon, dl = mode... 
main_8 et on va plus bas 
al,"6" si parametre = "6" 
main_7 non, on passe 
dl,80h  ; sinon, dl = mode... 
main_8 et on va plus bas 
al,"4n si parametre # "4". 
error ; --erreur 
dl,84h  ; sinon, dl = mode... 
ah,ah ï AH=0 (fonction SET MODE) 
al,dl 3 AL = Mode vidéo 
10h ; activation fonction vidéo 
exit 3 -..et on sort. 
dx, OFFSET usage 
ah,09h  ; affichage message d'erreur 
21h 
ah,éch  ; retour au DOS 
21h 
start ; That's ALL Folks ! 

Jacques Belin (123) 








message d'erreur 
scrn100 € 8 | 6 | 4 >" 


érification d'exécution 
sur un palmtop HP 





;si hp100, on passe 
Not_100 
3 SI * sur Longueur param 


si pas de paramètres... 
. erreur 


SAUT DES ESPACES DU PARAMETRE 
CX = nbre caractères param 


Lecture caractère param 





























LE COIN DES CODES 


La compilation de certains programmes, tels ceux 
écrits en assembleur, nécessitent souvent un logiciel 
que ne possèdent pas tous nos lecteurs. Le Coin des 
Codes permet de résoudre ce problème. 


Note importante : 


Même si la présentation des listings est identique, le 
traitement de ceux-ci est différente suivant le 
programme d’entrée et la machine de destination. 
Chaque listing est prévu pour être entré sur sa 
machine de destination. Par exemple, ne tentez pas 
d'entrer un programme HP48 dans un fichier 
MS-DOS à l’aide du programme Makepos. Vous 
obtiendrez un fichier que vous ne pourrez pas 
transférer dans la HP48. 


Programmes HP48 et HP28S 


Par rapport aux méthodes habituelles sur HP48, notre 
méthode effectuant un calcul local du checksum en 
fin de chaque ligne permet de faciliter la recherche 
d'erreurs, par rapport à une même recherche dans 
une chaîne de plusieurs centaines d’octets. 


Par mesure de sécurité sauvegardez vos programmes 
et fichiers, éventuellement verrouillez vos cartes. 


Tapez les deux programmes correspondant à votre 
machine: 

- pour HP-48 : ASSCOD48 et INPUT48 

- pour HP-28S : ASSCOD28 et INPUT28 

(attention aux parties communes et spécifiques HP-48 
ou HP-28S et aux commentaires) 

Ceci avec la plus grande attention car leur mauvais 
fonctionnement peut entraîner un désordre fatal pour 
les objets contenus dans votre machine. La 
commande speed (JPC-85 page 12) peut être incluse 
au début de ASSCOD28. NEWLINE (-) s'obtient sur 
HP-48 par [flèche bleue] puis [.]. 


ASSCOD48 996.5 octets 
cksum # 5D1Bh 


ASSCOD28 1136 octets 
cksum # D419h 


« RCLF HEX 64 STUS 1 SF "" "tmpcod' STO 

“nombre d'octets @ + NEWLINE 
@ NEWLINE 

"17 INPUT48 1 CF STR-+ 2 * 16 @ INPUT28 

DUP2 / IP 3 ROLLD MOD DUP2 0 > + @ si HP-28S 


3 ROLLD 1 + 4 ROLL # Oh DUP + nr f s o « 1 SWAP 

FOR i 

DO "Ligne # i 1 - R-B # 1000h + -STR 4 6 SUB + DUP 
L @ NEWLIN 

@ + NEWLINE 





chaine 


1F THEN r DUP 4 / IP + SWAP OVER 1 SWAP OVER - 
SUB SuAP 18 + ELSE 38 END ‘o’ STO + 
“ @ NEWLINE 
“+ 1 FS2C IF THEN ROT SWAP CLLCD 1 DISP HALT 
ELSE o INPUT4B END DUP  @ INPUT28 
WHILE DUP # POS DUP @ si HP-28S 
REPEAT DUP2 1 SWAP 1 - SUB 3 ROLLD 
1 + 25 SUB IF DUP " " == THEN DROP ELSE + END 
END DROP O OVER SIZE 1 SWAP 
FOR j OVER j DUP SUB NUM j * + NEXT 
s + DUP # FFFR AND 
" @ NEWLINE 
somme de controle @ + NEWLINE 
Dee @ + NEWLINE 
#1 6 ROLL SWAP + 34 INPUT4B STR- == @ INPUT28 
IF THEN SWAP DROP 1 @ si HP-28S 
ELSE DROP2 1000 1 BEEP 1 SF O END 
UNTIL END ?s’ STO 
MHILE DUP " " POS DUP 
REPEAT DUP2 1 SWAP 1 - SUB 3 ROLLD 1 + 19 SUB + 
END DROP "tmpcod’ DUP RCL ROT + SWAP STO 
NEXT f STOF » tmpcod 
@ * HP-48 * @@ “eeereeenmeens FIp.2BS vereneneeneens 
"GROB 8 " @@ # 20204A04F3D02C67h # FB0004FO2C96040Ch 
OVER SIZE @@ # 8DCCO5081F804F27h # 313103190F818341h 
2/1"  @@ # 681808AE91B51391h # 45DC061171085168h 
++ SAP @@ # F3D3CEAA125E5D8Eh # 2F9004h 28 STUS 
+ STR+  @@ #0 OR 64 STUS 1 7 START # 3B82h SYSEVAL 
# 4017n @G@ NEXT # 20238h SYSEVAL # 4F3Dh SYSEVAL 





SYSEVAL  @G@ EVAL 
# 56B6h  @@ toutes ces lignes marquées @@ peuvent 
SYSEVAL  @G@ être remplacées par ASC+ : 


DROP @@ soit pour HP-48 (JPC-79 page 11) 


NEWOB @G@ ou pour HP-28S (JPC-85 page 8) 

“fin“ CLLCD 1 DISP » @ HP-28S dito 
INPUT48 412.5 octets INPUT28 228 octets 
cksum # 15C7h cksum # 9412h 


«< SAP 1 @ partie commune 
WHILE OVER CLLCD 1 DISP @ HP-48 et HP-28 
REPEAT @ puis séquence 


DO UNTIL KEY END @ HP-48 ou HP-28 
Q@ “eerrennenes pp gg sseeesesse GQ sortes HPL2SS “ere 
1F DUP 51 == THEN DROP 0 @@ 1F DUP "ENTER" 
ELSE IF DUP 55 == THEN DROP @@ THEN DROP 0 
1 OVER SIZE 1 - SUB @@ ELSE 
ELSE @@ IF DUP "BACK" 
CASE DUP 17 < THEN 54 + END @@ THEN DROP 1 OVER 
DUP 66 < THEN 7 - END @@ SIZE 1 - SUB 
DUP 76 < THEN 20 - END @@ ELSE 
DUP 86 < THEN 33 - END @@ suite voir HP-48 
92 == THEN 48 END @@ 
46 END CHR @@ 
+ DUP SIZE 3 PICK - 2 + 5 MOD NOT @ partie 
1 FC? AND IF THEN “ # + END END 1 @ commune 
END END SWAP 60 SUB » @ HP-48 et HP-28 
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Donc à partir de maintenant pour tout assemblage de 
chaîne de codes procédez de manière suivante : 


1- lancez le programme ASSCOD48 où ASSCOD28 

2- donnez le nombre d’octets (1/2 octet compris) puis 
validez avec ENTER. 

3- tapez chaque ligne de codes, correspondant au 
numéro de ligne à 3 chiffres, sans les espaces et 
validez. 

4-tapez la somme de contrôle et validez. S'il y a 
erreur la ligne de codes sera demandé: nouveau 
après émission d’un BEep. L'appui sur EDIT fera 
apparaître la ligne des codes qui pourra être corrigée. 
Alors relancez avec conT. 

5- après l'affichage de "fin stockez le programme 
assemblé dans la variable donnée en tête. 

6- si tout s’est bien déroulé vous pouvez purger tmpcod 
qui contient la chaîne de codes. 





Programmes MS-DOS 


Afin d’être utilisé par tous, ce programme est destiné 
à être écrit en Gw8asIc. Il devrait cependant être facile 
de le convertir pour un autre programme (oBAsic, 
Turbo BASIC...). 


Programme MAKEDOS. BAS 


10 INPUT "Nom du fichier : 
20 OPEN NOM$ FOR OUTPUT AS #1 : CLOSE #1 : 
30 OPEN "bin.tmp" FOR OUTPUT AS #1 : S=0 : P$= 
40 NLINES=N\I6 : LENLAST=(N MOD 16)+CCN MOD 16)\5) 
50 IF CN MOD 16)=0 THEN NLINES=NLINES-1 : 
60 FOR X=0 TO NLINES 

70 LINES THEN PS=LEFTS(PS, LENLAST) 
80 
90 X2S=MO0"MHHEXSCX) : PRINT RIGHTSCX2S,3); 
100 Y=CSRLIN : LOCATE Y,6 : PRINT C$; : 














180 FOR Z=1 TO LEN(CS) STEP 2 
190 IF MIDS(C$,Z,1)=" " THEN Z=2-1 : 
200 CH=ASC(MIDS(CS,2,1))-48 : 





GOTO 230 


220 PRINT#1, CHRS((16*CH)+CL); 


230 NEXTZ 
240 S=M 
250 NEXT X 


260 CLOSE #1 : NAME "bin.tmp" AS NOMS : END 





LOCATE Y,6 : INPUT ,CS : 


IF CH>9 THEN CH=CH-7 
210 CL=ASC(MIDS(CS,2+1,1))-48 : IF CL>9 THEN CL=CL-7 


Mode d'emploi : 


1- Lancer le programme : GNBASIC MAKEDOS.BAS 

2- Entrer le nom du fichier destination. 

3- Entrer la taille du fichier. 

4- Entrer les listes de codes puis le checksum (en 
prenant soin d'entrer les codes héxadécimaux en 
majuscules). En cas d'erreur corriger la ligne, en 
prenant soin de placer le curseur après le dernier 
caractère avant de taper sur la touche d’entrée. 

5- Une fois que toutes les lignes sont entrées, sortir 
du Gwsasic en exécutant la commande sYstEM. Le 
nouveau programme est immédiatement disponible. 


Note : La taille du fichier résultant peut être 
supérieure d’un octet à ce qui est affiché dans le 
listing. Cela n’est pas un problème. 


“,NOM$ : INPUT “Nombre d'octets : ",N : N=N*2 
KILL NOMS 


LENLAST=LEN(PS) 


IF Y=24 THEN Y=Y-1 


110  LOCATE Y,27 : PRINT " sm = : LOCATE Ÿ,33 : INPUT "",D$ 

120 M=S 

130 FOR Z=1 TO LEN(CS) 

140 IF MIDS(CS,Z,1)<>" M THEN M=(M+((Z-(Z\S))*ASC(MIDS(CS,Z,1))) MOD 4096 
150 NEXT Z 

160 D2$="O0"+HEXS(M) : D2S=RIGHTS(D2S,3) 

170 IF D2$<>D$ THEN PRINT "Erreur de somme“ : BEEP : GOTO 90 
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SYMB28S 
# 37E6h 





0123 


: 7602 


D8co 
8c07 


: D335 
: 1902 


NSEM2 
# 4D43h 


000: 
001: 
002: 
003: 
004: 
005: 
006: 
007: 
008: 
009: 
O0A: 


0123 


D9D2 
FF30 
A6E 
261F 
écp8 
18F2 
cD20 
8FA3 
8DC7 
07FE 
B213 


4567 


0703 
3ACD 
0370 
FE33 
11E6 


4567 


0D29 
D9D2 
Occo 
514F 
A247 
693C 
3200 
BD08 
5308 
3089 
0821 


CNFGPICK.LIB 
# 8461h 


000: 
001: 
002: 
003: 
004: 
005: 
006: 
007: 
008: 
009: 
O0A: 
008: 
00c: 
000: 
00€: 
00F: 
010: 
011: 
012: 
013: 
014: 
015: 
016: 


0123 


0482 
E666 
B656 
A669 
0050 
0382 
TAFO 
4174 
D735 
D280 
0659 
781A 
3560 
8137 
0A34 
9AF8 
3133 
1843 
8016 
41F6 
1AF0 
3016 
134A 


4567 


0917 
9676 
2702 
F500 
0000 
008F 
A143 
1471 
1421 
861C 
0130 
F088 
8FB9 
B1AF 
D004 
1AFO 
1741 
45F0 
2152 
4808 
9187 
E14A 
6600 


89A8 


7044 
38c8 
co8c 
6FE3 
1410 


8948 


5128 
OAAB 
8813 
AAA2 
9A22 
co87 
O8FC 
F158 
0836 
F06F 


CHP28) 


40 octets 
CDEF sm 
020€ c8c 
CO7A COF 
O3AC B24 
3A8B 854 
9F20 878 

CHP48) 

85 octets 
CDEF sm 
F819 EOA 
3680 D78 
0038 9DF 
0831 776 
6205 43€ 
E26C 3AA 
2920 170 
DO04 F98 
5304 B6C 
BD81 AFF 

611 
CHP48) 


1015.5 octets 


898 


0011 
0205 
1212 
0820 
9020 
8976 
1338 
3317 
3016 
5143 
1641 
TAFO 
7608 
ÎAE6 
0145 
9BAA 
4713 
O0CA 
3938 
TAFT 
D735 
D280 
B1AF 


CDEF 


34F6 
9636 
1211 
06A6 
ccn2 
028 
1AFO 
4187 
E14A 
BAC6 
4213 
O8F7 
1AF1 
B1AF 
1746 
8314 
3058 
1301 
6593 
AE68 
1421 
8720 
088F 


sm 


css 
87E 
30F 
FEB 
E96 
céB 
gcc 
625 
2F0 
0E5 
BCB 
AA& 
8E5 
BAA 
466 
303 
F93 
co0 
827 
719 
381 
TAA 
020 


017: 
018: 
019: 
GA: 
018: 
O1c: 
010: 
O1E: 
O1F: 
020: 
021: 
022: 
023: 


020: 
O2E: 
02F: 
030: 
031: 
032: 
033: 
034: 
035: 
036: 
037: 
038: 
039: 
03A: 
038: 
03c: 
030: 
03€: 
03F: 
040: 
041: 
042: 
043: 
044: 
045: 
046: 
047: 
048: 
049: 
04A: 
048: 
04C: 
04D: 
O4E: 
O4F: 
050: 


9256 0804 
8E81 B434 
3016 1152 
0151 625E 
19CE 6E3F 
781A FOB8 
3560 8F89 
8137 81AF 
0A34 DO04 
E4A2 0560 
0000 0000 
0000 0000 
0000 0000 


: 0000 0000 
: 0000 0000 
: 0000 0000 
: 6000 0000 
: 0000 0000 
: 0000 0000 
: 0000 0000 
: 0000 0000 
: 0000 0000 


0000 3C37 
3708 2130 
00c2 A201 
0B20 00C4 
2797 0294 
4602 05F6 
000) 9D20 
40D9 D202 
0029 E20A 
2046 6600 
5008 5230 
3008 2130 
6100 D9D2 
040D 9020 
8002 9E20 
E20A 6670 
6500 8523 
6300 8213 
6620 OD9D 
FF30 D9D2 
E20A 6680 
0008 F146 
8F89 7603 
2606 A807 
910 O8DE 
OFFF 91FF 
FFFB SFFF 
FFAC EFF6 
F2DC FF22 
0000 0071 
E113 6cA1 
1503 1341 
20E4 B12B 
OccD 2013 
6081 8434 
3016 1142 


652 
CE00 
3938 
E174 
D015 
1AF0 
7608 
1AE6 
0145 
0000 
0000 
0000 
0000 
0000 
0000 
00E4 
0000 
0000 
0000 
0000 
0000 
0000 
0907 
8E92 
0000 
9626 
E602 
2747 
ECES 
9E20 
6640 
29E2 
29E2 
8213 
OECE 
29E2 
A664 
029€ 
029€ 
0821 

20EC 
OAEC 
Occo 
6081 

4007 
A505 
FF80 
F52F 
66FF 
2FFF 
FFFC 
3414 
3081 

646F 
2130 
0008 
D0BF 
818F 


CAO 


738 
508 
2DA 
183 
FFé 
F89 
E21 
841 
1c1 
841 
4c1 
E41 
7c1 
3A1 
D27 
6A7 
027 
9A7 
327 
CA7 


55E 
F95 
BBA 
7BE 
526 
2A4 
04C 
D84 
AA6 
798 


23€ 
FDC 
ciA 


63E 
204 
1c0 
05A 
EA6 
B81 
82E 


A4B 
811 
c83 
F08 
26c 
EAC 
coo 
A3C 


408 
Po] 
135 


051: 
052: 
053: 
056: 
055: 
056: 
057: 
058: 
059: 
O5A: 
058: 
05C: 
05D: 
05E: 
05F: 
060: 
061: 
062: 
063: 
064: 
065: 
066: 
067: 
068: 
069: 
06A: 
068: 
0éc: 
060: 
06E: 
06F: 
070: 
071: 
072: 
073: 
074: 
075: 
076: 
077: 
078: 
079: 
O7A: 
078: 
O7C: 
070: 
07E: 


6BFE 
1500 
1660 
OBE8 
6483 
2230 
130C 
9760 
1341 
8F99 
1920 
1513 
4606 
4150 
8434 
1146 
8A22 
3205 
0280 
0000 
0000 
0000 
0000 
0000 
4241 
0090 
1434 
LE4T 
4200 
000€ 
FF2A 
F22E 
ASBF 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 


7950 
9020 
0118 
2652 
6AEC 
4337 
cD20 
1431 
7414 
4231 
8A60 
1721 
6DFD 
ccp2 
COAF 
1320 
1341 
0874 
0000 
0000 
0000 
0000 
0000 
00€4 
4454 
C494 
8410 
454E 
9400 
4A20 
CFFE 
FFD6 
FFCE 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 
0000 


SCRN100.COM 


0123 


4567 


000: EB49 7573 
001: 3420 2073 
002: 3030 2078 
003: 2036 207C 
004: ODOA OA24 


1583 8F34 E9D 
FA45 0198 C18 
8130 3C37 845 
3309 6126 428 
8175 6603 154 
0954 50B2  D86 
Cé00 O8FB BFF 
7414 7131  72A 
3174 D881 3C1 
6414 2361 FA 
2164 1523 ASA 
6481 8F92 77E 
2155 38F3 596 
0340 0081 16A 
FCA1 3216 FAO 
A340 4B20 C3D 
OA66 DABD BO0E 
65D2 E4A2 949 
0000 0000 303 
0000 0000  c83 
0000 00D2 74F 
0000 0000 OCF 
0000 0000 A4F 
0009 0C49  6c4 
5143 4840 232 
2444 5445 E3E 
0803 4841 9EF 
40BC 4942 797 
0730 0052 236 
2300 064€ E82 
FCFF SEDF 224 
EFFS FAFF 543 
FFFB A600 60€ 
0000 0000 F8 
0000 0000 90 
0000 0000 28c 
0000 0000 coc 
0000 0000 58c 
0000 0000 FOC 
0000 0000 88c 
0000 0000 20c 
0000 0000  B8c 
0000 0000 50C 
0000 0000 E8c 
0000 0000 80c 
0000 000 E8C 


CHS-D0S) 
159 octets 


89AB CDEF sm 


6167 6520  BFB 
6372 6E31 863 
2038 207C 500 
2034 207D 19C 
5468 6973 E78 
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005: 2070 726F 
006: 2072 756E 
007: 6c79 206F 
2048 5031 
: OD0A 2488 
: 81F8 5048 
: 0174 O5BA 
BE80 OOAC 
32ED 8AC8 
: 0549 75F8 
: 7504 B203 
: 7504 B280 
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6772 
7320 
6E20 
3030 
D44D 
7505 
2401 
3c01 
AC3C 
EBTE 
EB0E 
EB06 


616D 
éFéE 
616E 
4c58 
cp15 
80FD 
EB37 
762C 
2075 
3c38 
3c36 
3c34 


BEF 
A40 
82D 


388 
180 
FéB 
D30 
BC8 
AF3 
930 
6p3 





750A B284 32E4 BAC2  53F 
cD10 EB07 BAO2 0184 2CA 
013: 09CD 21B4 4CCD 21 ABE 004: 6C1C 





: 1700 
: 502C 





005: 2500 

006: 760€ 

CHP48) 007: 1431 
91 octets 008: 19EA 
009: 1711 


0123 4567 89AB CDEF sm 00A: 50B9 


008: 0B21 


D9D2 OD29 51D9 F81D F14 
001: 0040 D9D2 0902 36A2  BE2 


—,————— 


9020 
2304 
1632 
08F1 
cp81 
3117 
8081 
60cD 
F068 
30 


B872 
1626 
230C 
4660 
4313 
9319 
8686 
54E8 
2130 


éFD5 
A162 
cD20 
8FB9 
0174 
3158 
1580 
D341 
8213 


Ouf, c'est terminé pour cette année 
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